diff options
| author | Karl Heuer | 1994-05-12 14:45:30 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-05-12 14:45:30 +0000 |
| commit | 73e4e0eb1a744c0bbc50afa5015f9013110f5a79 (patch) | |
| tree | 38e11c041458baf0d0b962b4c2c6643afc805c81 | |
| parent | fed76e7839cf9ba9fd802d72a1bdc28d6281dd7c (diff) | |
| download | emacs-73e4e0eb1a744c0bbc50afa5015f9013110f5a79.tar.gz emacs-73e4e0eb1a744c0bbc50afa5015f9013110f5a79.zip | |
(update-autoloads-here): Split up long message.
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 5ed050941e2..551bba03923 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el | |||
| @@ -333,9 +333,11 @@ Update sections of the current buffer generated by \\[update-file-autoloads]." | |||
| 333 | (or (get-file-buffer file) | 333 | (or (get-file-buffer file) |
| 334 | (file-exists-p file))) | 334 | (file-exists-p file))) |
| 335 | () | 335 | () |
| 336 | (setq file (if (y-or-n-p (format "Library \"%s\" (load \ | 336 | (message "Can't find library \"%s\" (load file \"%s\")" |
| 337 | file \"%s\") doesn't exist. Remove its autoload section? " | 337 | (nth 2 form) file) |
| 338 | (nth 2 form) file)) | 338 | (sit-for 2) |
| 339 | (setq file (if (y-or-n-p (format "Remove autoloads for \"%s\"? " | ||
| 340 | (nth 2 form))) | ||
| 339 | t | 341 | t |
| 340 | (condition-case () | 342 | (condition-case () |
| 341 | (read-file-name (format "Find \"%s\" load file: " | 343 | (read-file-name (format "Find \"%s\" load file: " |