X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fcode-files.el;h=893908dbff1efe26fbff4d02ed9a26c576786398;hb=f9fdf5a6cb58286f64f6f8bd0bfd2dab9b9b8816;hp=d74a11ca15b9f2b59899f2f6cb1c7302f6584ee4;hpb=976b002b16336930724ae22476014583ad022e7d;p=chise%2Fxemacs-chise.git

diff --git a/lisp/code-files.el b/lisp/code-files.el
index d74a11c..893908d 100644
--- a/lisp/code-files.el
+++ b/lisp/code-files.el
@@ -32,7 +32,7 @@
 
 ;;; Code:
 
-(setq-default buffer-file-coding-system 'no-conversion)
+(setq-default buffer-file-coding-system 'raw-text)
 (put 'buffer-file-coding-system 'permanent-local t)
 
 (define-obsolete-variable-alias
@@ -284,7 +284,7 @@ Return t if file exists."
 	       (save-excursion
 		 (set-buffer (get-buffer-create " *load*"))
 		 (erase-buffer)
-		 (let ((coding-system-for-read 'no-conversion))
+		 (let ((coding-system-for-read 'raw-text))
 		   (insert-file-contents path nil 1 3001))
 		 (find-coding-system-magic-cookie))
 	       (if elc
@@ -381,7 +381,7 @@ The coding system used for decoding the file is determined as follows:
 3. The matching value for this filename from
    `file-coding-system-alist', if any.
 4. `buffer-file-coding-system-for-read', if non-nil.
-5. The coding system 'no-conversion.
+5. The coding system 'raw-text.
 
 If a local value for `buffer-file-coding-system' in the current buffer
 does not exist, it is set to the coding system which was actually used
@@ -410,7 +410,7 @@ and `insert-file-contents-post-hook'."
 		 ;; #4.
 		 buffer-file-coding-system-for-read
 		 ;; #5.
-		 'no-conversion))
+		 'raw-text))
 	  (if (consp coding-system)
 	      (setq return-val coding-system)
 	    (if (null (find-coding-system coding-system))