[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/w32-fns.el
From: |
Jason Rumney |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/w32-fns.el |
Date: |
Tue, 20 Nov 2001 17:14:20 -0500 |
Index: emacs/lisp/w32-fns.el
diff -u emacs/lisp/w32-fns.el:1.46 emacs/lisp/w32-fns.el:1.47
--- emacs/lisp/w32-fns.el:1.46 Mon Oct 29 13:49:16 2001
+++ emacs/lisp/w32-fns.el Tue Nov 20 17:14:20 2001
@@ -291,17 +291,22 @@
"Set the coding system used by the Windows System to CODING-SYSTEM.
This is used for things like passing font names with non-ASCII
characters in them to the system. For a list of possible values of
-CODING-SYSTEM, use \\[list-coding-systems]."
+CODING-SYSTEM, use \\[list-coding-systems].
+
+This function is provided for backward compatibility, since
+w32-system-coding-system is now an alias for `locale-coding-system'."
(interactive
- (list (let ((default w32-system-coding-system))
+ (list (let ((default locale-coding-system))
(read-coding-system
(format "Coding system for system calls (default, %s): "
default)
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)
+ (setq locale-coding-system coding-system))
+
+;; locale-coding-system was introduced to do the same thing as
+;; w32-system-coding-system. Use that instead.
+(defvaralias 'w32-system-coding-system 'locale-coding-system)
;;; Set to a system sound if you want a fancy bell.
(set-message-beep nil)
- [Emacs-diffs] Changes to emacs/lisp/w32-fns.el,
Jason Rumney <=