# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1193900862 0
# Node ID 07652ce8f3df47b9d59b6f720e4b0ded0bac19e8
# Parent  f5b982bf98e0bcb382690315b589c4ec35caeb0b
(authors-scan-change-log)
(authors-scan-el): Don't enable local eval; enable only safe local
variables, without querying.

diff -r f5b982bf98e0 -r 07652ce8f3df lisp/emacs-lisp/authors.el
--- a/lisp/emacs-lisp/authors.el	Thu Nov 01 04:56:10 2007 +0000
+++ b/lisp/emacs-lisp/authors.el	Thu Nov 01 07:07:42 2007 +0000
@@ -475,8 +475,8 @@
 :wrote		means the author wrote the file
 :changed	means he changed the file COUNT times."
 
-  (let* ((enable-local-variables t)
-	 (enable-local-eval t)
+  (let* ((enable-local-variables :safe)
+	 (enable-local-eval nil)
 	 (existing-buffer (get-file-buffer log-file))
 	 (buffer (find-file-noselect log-file))
 	 author file pos)
@@ -521,8 +521,8 @@
   "Scan Lisp file FILE for author information.
 TABLE is a hash table to add author information to."
   (let* ((existing-buffer (get-file-buffer file))
-	 (enable-local-variables t)
-	 (enable-local-eval t)
+	 (enable-local-variables :safe)
+	 (enable-local-eval nil)
 	 (buffer (find-file-noselect file)))
     (save-excursion
       (set-buffer buffer)