(w32-system-coding-system): Initialize from

locale-coding-system.

diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el
index 52bd0f97a817a59e2545b892e65c411a6b6b143c..f4fb5e1f50f69cbe6e90d7ec487889eac7e93bb9 100644 (file)
--- a/lisp/w32-fns.el
+++ b/lisp/w32-fns.el
@@ -296,8 +296,9 @@ CODING-SYSTEM, use \\[list-coding-systems]."
             default))))
   (check-coding-system coding-system)
   (setq w32-system-coding-system coding-system))
-;; Set system coding system initially to iso-latin-1
-(set-w32-system-coding-system 'iso-latin-1)
+;; Set system coding system initially from locale-coding-system.
+;; In future, when defvaralias is available, this will become an alias.
+(set-w32-system-coding-system locale-coding-system)
 
 ;;; Set to a system sound if you want a fancy bell.
 (set-message-beep nil)