changeset 5374:36825a811740

(hack-one-local-variable): Treat file-name-handler-alist kand after-load-alist like eval.
author Richard M. Stallman <rms@gnu.org>
date Thu, 30 Dec 1993 10:51:33 +0000
parents a70b89d2d6bb
children 0e30cf7aa525
files lisp/files.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Thu Dec 30 10:08:46 1993 +0000
+++ b/lisp/files.el	Thu Dec 30 10:51:33 1993 +0000
@@ -1052,7 +1052,7 @@
 	 nil)
 	;; "Setting" eval means either eval it or do nothing.
 	;; Likewise for setting hook variables.
-	((or (eq var 'eval)
+	((or (memq var '(eval file-name-handler-alist after-load-alist))
 	     (string-match "-hooks?$\\|-functions?$" (symbol-name var)))
 	 (if (and (not (string= (user-login-name) "root"))
 		  (or (eq enable-local-eval t)