X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fcode-files.el;h=799c399a070be74fe5cd863fe8bc0a2c728c68e3;hp=1738d7082cc4eb98cbf2e150de8d9935d575ebd7;hb=426fe636212336bb32a5e6f187c4d623709fa57d;hpb=21db8709c0c2dcedbd278c7fe571290d5ce80a71

diff --git a/lisp/code-files.el b/lisp/code-files.el
index 1738d70..799c399 100644
--- 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