Mercurial > emacs

changeset 29575:ab979e3b519a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(set-buffer-file-coding-system): If CODING-SYSTEM is nil, set buffer-file-coding-system to nil unconditionally.
author Kenichi Handa <handa@m17n.org>
date Mon, 12 Jun 2000 00:04:43 +0000
parents a68f208f3dba
children 961f303cda37
files lisp/international/mule.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule.el	Mon Jun 12 00:03:29 2000 +0000
+++ b/lisp/international/mule.el	Mon Jun 12 00:04:43 2000 +0000
@@ -815,7 +815,7 @@
 `buffer-file-coding-system' directly."
   (interactive "zCoding system for visited file (default, nil): \nP")
   (check-coding-system coding-system)
-  (if (and buffer-file-coding-system (null force))
+  (if (and coding-system buffer-file-coding-system (null force))
       (let ((x (coding-system-eol-type buffer-file-coding-system))
 	    (y (coding-system-eol-type coding-system)))
 	(if (and (numberp x) (>= x 0) (<= x 2) (vectorp y))