diff options
| author | Richard M. Stallman | 1998-03-09 01:01:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-03-09 01:01:36 +0000 |
| commit | 8539959b7b9042eb29d51d5199e146fa97f120b1 (patch) | |
| tree | 581b4a201f5e9ab50b95cb8142a3fbbe4d14377c | |
| parent | 3d2f23d923f2dbb709359d263deaa1800528809c (diff) | |
| download | emacs-8539959b7b9042eb29d51d5199e146fa97f120b1.tar.gz emacs-8539959b7b9042eb29d51d5199e146fa97f120b1.zip | |
(update-file-autoloads):
Undo 1997-08-23 change.
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 1a85cd7c688..a8e57669de5 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el | |||
| @@ -310,10 +310,7 @@ are used." | |||
| 310 | (set-buffer existing-buffer)) | 310 | (set-buffer existing-buffer)) |
| 311 | ;; We must read/write the file without any code conversion. | 311 | ;; We must read/write the file without any code conversion. |
| 312 | (let ((coding-system-for-read 'no-conversion)) | 312 | (let ((coding-system-for-read 'no-conversion)) |
| 313 | (set-buffer (find-file-noselect | 313 | (set-buffer (find-file-noselect generated-autoload-file))) |
| 314 | (expand-file-name generated-autoload-file | ||
| 315 | (expand-file-name "lisp" | ||
| 316 | source-directory))))) | ||
| 317 | (or (> (buffer-size) 0) | 314 | (or (> (buffer-size) 0) |
| 318 | (error "Autoloads file %s does not exist" buffer-file-name)) | 315 | (error "Autoloads file %s does not exist" buffer-file-name)) |
| 319 | (or (file-writable-p buffer-file-name) | 316 | (or (file-writable-p buffer-file-name) |