diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-05-12 14:45:30 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-05-12 14:45:30 +0000 |
| commit | 73e4e0eb1a744c0bbc50afa5015f9013110f5a79 (patch) | |
| tree | 38e11c041458baf0d0b962b4c2c6643afc805c81 /lisp/emacs-lisp | |
| parent | fed76e7839cf9ba9fd802d72a1bdc28d6281dd7c (diff) | |
| download | emacs-73e4e0eb1a744c0bbc50afa5015f9013110f5a79.tar.gz emacs-73e4e0eb1a744c0bbc50afa5015f9013110f5a79.tar.bz2 emacs-73e4e0eb1a744c0bbc50afa5015f9013110f5a79.zip | |
(update-autoloads-here): Split up long message.
Diffstat (limited to 'lisp/emacs-lisp')
| -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]." (or (get-file-buffer file) (file-exists-p file))) () - (setq file (if (y-or-n-p (format "Library \"%s\" (load \ -file \"%s\") doesn't exist. Remove its autoload section? " - (nth 2 form) file)) + (message "Can't find library \"%s\" (load file \"%s\")" + (nth 2 form) file) + (sit-for 2) + (setq file (if (y-or-n-p (format "Remove autoloads for \"%s\"? " + (nth 2 form))) t (condition-case () (read-file-name (format "Find \"%s\" load file: " |