From 36d455c43b9a6d83348488a0a67685e902dd0fab Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 12 Jun 2000 00:04:43 +0000 Subject: [PATCH] (set-buffer-file-coding-system): If CODING-SYSTEM is nil, set buffer-file-coding-system to nil unconditionally. --- lisp/international/mule.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 92c29fc78f1..16e4c7e9ed8 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -815,7 +815,7 @@ don't want to mark the buffer modified, just set the variable `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)) -- 2.39.2