From: Roland McGrath <roland@gnu.org>
Date: Sat, 6 Jan 1996 19:57:24 +0000 (+0000)
Subject: (update-file-autoloads): Fix placement of new sections.
X-Git-Tag: emacs-19.34~1816
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0f09bac62e88bb00387efc56aafed095672f773e;p=emacs.git

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

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