(update-file-autoloads): Fix placement of new sections.

diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index 829b5ec55cf7c6f794bb1e5018ccc628b36d6180..b019294e365bf9749d135e7b11ae20e86c2a0216 100644 (file)
--- 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