# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 768211864 0
# Node ID 0611d70ad4801c2d4358b77e4d7e46caabe27706
# Parent  334cececa42dc2b8221d2bbed556da8cd3f4f526
(update-directory-autoloads): Ignore files
whose names start with =.  Bind enable-local-eval to nil.

diff -r 334cececa42d -r 0611d70ad480 lisp/emacs-lisp/autoload.el
--- a/lisp/emacs-lisp/autoload.el	Fri May 06 06:45:18 1994 +0000
+++ b/lisp/emacs-lisp/autoload.el	Fri May 06 08:11:04 1994 +0000
@@ -354,8 +354,9 @@
 (defun update-directory-autoloads (dir)
   "Run \\[update-file-autoloads] on each .el file in DIR."
   (interactive "DUpdate autoloads for directory: ")
-  (mapcar 'update-file-autoloads
-	  (directory-files dir t "\\.el$"))
+  (let ((enable-local-eval nil))
+    (mapcar 'update-file-autoloads
+	    (directory-files dir t "^[^=].*\\.el$")))
   (if (interactive-p)
       (save-excursion
 	(set-buffer (find-file-noselect generated-autoload-file))