From 2837b9df2e9d720225f2d38235bbded9a0922f3b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 9 Jun 1996 19:11:53 +0000 Subject: [PATCH] (hack-local-variables-prop-line): Bind enable-local-eval. --- lisp/files.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 7a3bb717c2a..d8f7c220dc7 100644 --- 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. -- 2.39.2