Add more risky-local-variable properties.

diff --git a/lisp/files.el b/lisp/files.el
index da51f543149d6a5bfaeaa0ec203aa1190cd1e646..c2f945d5682d1f584683427114dbb62dec5705b6 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1105,11 +1105,15 @@ If `enable-local-variables' is nil, this function does not check for a
   "Variables to be ignored in a file's local variable spec.")
 
 ;; Get confirmation before setting these variables as locals in a file.
+(put 'enable-local-eval 'risky-local-variable t)
 (put 'eval 'risky-local-variable t)
 (put 'file-name-handler-alist 'risky-local-variable t)
 (put 'minor-mode-map-alist 'risky-local-variable t)
 (put 'after-load-alist 'risky-local-variable t)
-           
+(put 'buffer-file-name 'risky-local-variable t)
+(put 'buffer-auto-save-file-name 'risky-local-variable t)
+(put 'buffer-file-truename 'risky-local-variable t)
+
 (defun hack-one-local-variable-quotep (exp)
   (and (consp exp) (eq (car exp) 'quote) (consp (cdr exp))))