changeset 1699:68169b2a743e

[xemacs-hg @ 2003-09-19 16:39:43 by youngs] * code-files.el (insert-file-contents): Make sure that setbuffer-file-coding-system sets the eol style.
author youngs
date Fri, 19 Sep 2003 16:39:43 +0000
parents 4b7295e5a412
children 0a85daf64258
files lisp/ChangeLog lisp/code-files.el
diffstat 2 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Sep 19 16:32:57 2003 +0000
+++ b/lisp/ChangeLog	Fri Sep 19 16:39:43 2003 +0000
@@ -3,6 +3,9 @@
 	* code-init.el (eol-detection-enabled-p): eval the initialization
 	value.
 
+	* code-files.el (insert-file-contents): Make sure that
+	setbuffer-file-coding-system sets the eol style.
+
 2003-09-19  Stephen J. Turnbull  <stephen@xemacs.org>
 
 	* win32-native.el (grep-null-device): Defined in
--- a/lisp/code-files.el	Fri Sep 19 16:32:57 2003 +0000
+++ b/lisp/code-files.el	Fri Sep 19 16:39:43 2003 +0000
@@ -454,9 +454,9 @@
 	  ;; set already.
 	  (set-buffer-file-coding-system
 	   (subsidiary-coding-system buffer-file-coding-system
-				     (coding-system-eol-type coding-system)))
+				     (coding-system-eol-type coding-system)) t)
 	;; otherwise actually set buffer-file-coding-system.
-	(set-buffer-file-coding-system coding-system)))
+	(set-buffer-file-coding-system coding-system t)))
     ;; ... and `buffer-file-coding-system-when-loaded'.  the machinations
     ;; of set-buffer-file-coding-system cause the actual coding system
     ;; object to be stored, so do that here, too.