diff options
Diffstat (limited to 'lisp/emacs-lisp/autoload.el')
-rw-r--r-- | lisp/emacs-lisp/autoload.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 829b5ec55cf..b019294e365 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -330,8 +330,14 @@ autoloads go somewhere else.") ;; insert one before the section here. (goto-char (match-beginning 0)) (setq found 'new))))) + (or found + (progn + (setq found 'new) + ;; No later sections in the file. Put before the last page. + (goto-char (point-max)) + (search-backward "\f"))) (or (eq found 'up-to-date) - (and (memq found '(nil new)) + (and (eq found 'new) ;; Check that FILE has any cookies before generating a ;; new section for it. (save-excursion |