changeset 14044:1c331f9332ae

(update-file-autoloads): Fix placement of new sections.
author Roland McGrath <roland@gnu.org>
date Sat, 06 Jan 1996 19:57:24 +0000
parents d44a43c284e7
children 1300c7703f67
files lisp/emacs-lisp/autoload.el
diffstat 1 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/autoload.el	Sat Jan 06 18:38:41 1996 +0000
+++ b/lisp/emacs-lisp/autoload.el	Sat Jan 06 19:57:24 1996 +0000
@@ -330,8 +330,14 @@
 		     ;; 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