Mercurial > emacs

diff lisp/emacs-lisp/autoload.el @ 111087:8d485e5aa143

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Small autoloads fix. * lisp/emacs-lisp/autoload.el (batch-update-autoloads): Update for src/Makefile no longer being pre-processed.
author Glenn Morris <rgm@gnu.org>
date Thu, 21 Oct 2010 20:32:46 -0700
parents 280c8ae2476d
children 3655cc4062e4
line wrap: on
line diff
--- a/lisp/emacs-lisp/autoload.el	Thu Oct 21 20:28:21 2010 -0700
+++ b/lisp/emacs-lisp/autoload.el	Thu Oct 21 20:32:46 2010 -0700
@@ -778,16 +778,17 @@
 	  (with-temp-buffer
 	    (insert-file-contents mfile)
 	    (when (re-search-forward "^shortlisp= " nil t)
-	      (setq lim (line-end-position))
-	      (while (re-search-forward "\\.\\./lisp/\\([^ ]+\\.el\\)c?\\>"
-					lim t)
+	      (while (and (not lim)
+			  (re-search-forward "\\.\\./lisp/\\([^ ]+\\.el\\)c?\\>"
+					     nil t))
 		(push (expand-file-name (match-string 1) ldir)
-		      autoload-excludes))))))))
+		      autoload-excludes)
+		(skip-chars-forward " \t")
+		(if (eolp) (setq lim t)))))))))
   (let ((args command-line-args-left))
     (setq command-line-args-left nil)
     (apply 'update-directory-autoloads args)))
 
 (provide 'autoload)
 
-;; arch-tag: 00244766-98f4-4767-bf42-8a22103441c6
 ;;; autoload.el ends here