Mercurial > emacs

diff lisp/emacs-lisp/autoload.el @ 105515:4adf54462047

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(batch-update-autoloads): Remove useless use of concat.
author Glenn Morris <rgm@gnu.org>
date Wed, 07 Oct 2009 16:10:31 +0000
parents a4b36898ee9a
children 97edf9210d35
line wrap: on
line diff
--- a/lisp/emacs-lisp/autoload.el	Wed Oct 07 15:04:43 2009 +0000
+++ b/lisp/emacs-lisp/autoload.el	Wed Oct 07 16:10:31 2009 +0000
@@ -693,8 +693,9 @@
 	  (insert-file-contents mfile)
 	  (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")
+	    (while (re-search-forward "\\${lispsource}\\([^ ]+\\.el\\)c?\\>"
+				      lim t)
+	      (push (expand-file-name (match-string 1) ldir)
 		    autoload-excludes)))))))
   (let ((args command-line-args-left))
     (setq command-line-args-left nil)