diff options
| author | Roland McGrath | 1993-07-18 20:01:03 +0000 |
|---|---|---|
| committer | Roland McGrath | 1993-07-18 20:01:03 +0000 |
| commit | 811eaa609c80ca9381d1310028018cbfb1b673f1 (patch) | |
| tree | 84349aeaceb5c5cc3a3ca329e3ba0a8d65228225 | |
| parent | f58c6f70237e5106a1ca9b16cb50ab50afde31c8 (diff) | |
| download | emacs-811eaa609c80ca9381d1310028018cbfb1b673f1.tar.gz emacs-811eaa609c80ca9381d1310028018cbfb1b673f1.zip | |
(update-file-autoloads): Go to the beginning of FILE before searching it
for generate-autoload-cookie.
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 0950a1af574..8c184070be3 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el | |||
| @@ -263,7 +263,10 @@ autoloads go somewhere else.") | |||
| 263 | (if (save-excursion | 263 | (if (save-excursion |
| 264 | (set-buffer (find-file-noselect file)) | 264 | (set-buffer (find-file-noselect file)) |
| 265 | (save-excursion | 265 | (save-excursion |
| 266 | (search-forward generate-autoload-cookie nil t))) | 266 | (save-restriction |
| 267 | (widen) | ||
| 268 | (goto-char (point-min)) | ||
| 269 | (search-forward generate-autoload-cookie nil t)))) | ||
| 267 | ;; There are autoload cookies in FILE. | 270 | ;; There are autoload cookies in FILE. |
| 268 | ;; Have the user tell us where to put the new section. | 271 | ;; Have the user tell us where to put the new section. |
| 269 | (progn | 272 | (progn |