(update-file-autoloads): Give clean errors
if autoloads file is empty or can't be written.
This commit is contained in:
parent
7f45de2dfc
commit
0b33ec466a
1 changed files with 4 additions and 0 deletions
|
@ -314,6 +314,10 @@ are used."
|
|||
(expand-file-name generated-autoload-file
|
||||
(expand-file-name "lisp"
|
||||
source-directory)))))
|
||||
(or (> (buffer-size) 0)
|
||||
(error "Autoloads file %s does not exist" buffer-file-name))
|
||||
(or (file-writable-p buffer-file-name)
|
||||
(error "Autoloads file %s is not writable" buffer-file-name))
|
||||
(save-excursion
|
||||
(save-restriction
|
||||
(widen)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue