(batch-update-autoloads): Fix last change to not error out of search

for "^lisp=" fails.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cf0fab71488bf2fc6f430fd0be620e5801460c96..445aa4ad7d7637f8319031f8c84b290a8e02160d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-10-07  Eli Zaretskii  <eliz@gnu.org>
+
+       * emacs-lisp/autoload.el (batch-update-autoloads): Fix last change
+       to not error out of search for "^lisp=" fails.
+
 2009-10-07  Juanma Barranquero  <lekktu@gmail.com>
 
        * makefile.w32-in (WINS_UPDATES): New macro.

diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index 593cdb6828471bc272edac1cdc427185ab8479bf..7a0a43631deb3ef33c62e5bb84364951bf393eef 100644 (file)
--- a/lisp/emacs-lisp/autoload.el
+++ b/lisp/emacs-lisp/autoload.el
@@ -691,7 +691,7 @@ Calls `update-directory-autoloads' on the command line arguments."
       (when (file-readable-p mfile)
        (with-temp-buffer
          (insert-file-contents mfile)
-         (when (re-search-forward "^lisp= ")
+         (when (re-search-forward "^lisp= " nil t)
            (setq lim (line-end-position))
            (while (re-search-forward "\\${lispsource}\\([^ ]*\\)\\.elc?" lim t)
              (push (concat (expand-file-name (match-string 1) ldir) ".el")