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

This commit is contained in:
Richard M. Stallman 1996-06-09 19:11:53 +00:00
parent c1b1350b94
commit 2837b9df2e

View file

@ -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.