From 9e3366e44bb25a631431112881f07d100a47d3e3 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 6 Dec 2000 13:56:18 +0000 Subject: (update-file-autoloads): Use raw-text to read generated-autoload-file, and set buffer-file-coding-system to raw-text-unix after reading the file. --- lisp/emacs-lisp/autoload.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 3928ee1a747..7be1e71f466 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -376,12 +376,16 @@ are used." ;; the local variables section if it's there. (if existing-buffer (set-buffer existing-buffer)) - ;; We must read/write the file without any code conversion. - (let ((coding-system-for-read 'no-conversion)) + ;; We must read/write the file without any code conversion, + ;; but still decode EOLs. + (let ((coding-system-for-read 'raw-text)) (set-buffer (find-file-noselect (expand-file-name generated-autoload-file (expand-file-name "lisp" - source-directory))))) + source-directory)))) + ;; This is to make generated-autoload-file have Unix EOLs, so + ;; that it is portable to all platforms. + (setq buffer-file-coding-system 'raw-text-unix)) (or (> (buffer-size) 0) (error "Autoloads file %s does not exist" buffer-file-name)) (or (file-writable-p buffer-file-name) -- cgit v1.2.3