]> git.eshelyaron.com Git - emacs.git/commitdiff
Bind enable-local-variables to nil globally (fix dbe3e41)
authorKatsumi Yamaoka <yamaoka@jpl.org>
Tue, 20 Jun 2017 03:46:21 +0000 (03:46 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Tue, 20 Jun 2017 03:46:21 +0000 (03:46 +0000)
* lisp/gnus/mm-view.el (mm-display-inline-fontify):
Bind enable-local-variables to nil globally instead of making it
buffer-local; remove let-bind of local-enable-local-variables.
cf. <b4mtw3bbfp5.fsf@jpl.org> in the emacs-devel list.

lisp/gnus/mm-view.el

index 4276f9e9a431e2f6d1e7f2f74f7e1f6118fe6f23..9ff581da99671a5b773568d1acaa52497614e590 100644 (file)
@@ -475,12 +475,12 @@ If MODE is not set, try to find mode automatically."
       (require 'font-lock)
       ;; I find font-lock a bit too verbose.
       (let ((font-lock-verbose nil)
-           (font-lock-support-mode nil))
+           (font-lock-support-mode nil)
+           (enable-local-variables nil))
        ;; Disable support modes, e.g., jit-lock, lazy-lock, etc.
        ;; Note: XEmacs people use `font-lock-mode-hook' to run those modes.
        (set (make-local-variable 'font-lock-mode-hook) nil)
         (setq buffer-file-name (mm-handle-filename handle))
-        (set (make-local-variable 'enable-local-variables) nil)
        (with-demoted-errors
          (if mode
              (save-window-excursion
@@ -488,8 +488,7 @@ If MODE is not set, try to find mode automatically."
                (funcall mode))
            (let ((auto-mode-alist
                   (delq (rassq 'doc-view-mode-maybe auto-mode-alist)
-                        (copy-sequence auto-mode-alist)))
-                 (local-enable-local-variables nil))
+                        (copy-sequence auto-mode-alist))))
              (set-auto-mode)))
          ;; The mode function might have already turned on font-lock.
          ;; Do not fontify if the guess mode is fundamental.