XEmacs 21.4.6 "Common Lisp".

[chise/xemacs-chise.git.1] / lisp / code-files.el

diff --git a/lisp/code-files.el b/lisp/code-files.el
index 1738d70..799c399 100644 (file)
--- a/lisp/code-files.el
+++ b/lisp/code-files.el
@@ -116,7 +116,8 @@ something other than what it is at the moment."
           (coding-system-base buffer-file-coding-system)
           (cond ((eq eol-type 'lf) 'crlf)
                 ((eq eol-type 'crlf) 'lf)
-                ((eq eol-type 'cr) 'lf))))))
+                ((eq eol-type 'cr) 'lf))))
+    (set-buffer-modified-p t)))
 
 (define-obsolete-function-alias
   'set-file-coding-system