(hack-local-variables-prop-line): Bind enable-local-eval.

diff --git a/lisp/files.el b/lisp/files.el
index 7a3bb717c2a4dad8b7b30a5f60ebc1bffb26a8d4..d8f7c220dc7b843b03db363fc123e719a268a555 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1250,9 +1250,10 @@ If `enable-local-variables' is nil, this function does not check for a
                                (switch-to-buffer-other-frame (current-buffer))))))
                          (y-or-n-p (format "Set local variables as specified in -*- line of %s? "
                                            (file-name-nondirectory buffer-file-name)))))))
-         (while result
-           (hack-one-local-variable (car (car result)) (cdr (car result)))
-           (setq result (cdr result)))))))
+         (let ((enable-local-eval enable-local-eval))
+           (while result
+             (hack-one-local-variable (car (car result)) (cdr (car result)))
+             (setq result (cdr result))))))))
 
 (defvar hack-local-variables-hook nil
   "Normal hook run after processing a file's local variables specs.