(lm-with-file): Cease enabling 'emacs-lisp-mode'

This avoids running the mode hook (e.g. turning on Flymake) in
each examined file.

diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el
index f111a77663ca3b02c15433658969c3da5163364e..826198f08331fd239c66dc26b16f37251186be2a 100644 (file)
--- a/lisp/emacs-lisp/lisp-mnt.el
+++ b/lisp/emacs-lisp/lisp-mnt.el
@@ -288,14 +288,12 @@ If FILE is nil, execute BODY in the current buffer."
        (if ,filesym
           (with-temp-buffer
             (insert-file-contents ,filesym)
-            (emacs-lisp-mode)
-            ,@body)
+            (with-syntax-table emacs-lisp-mode-syntax-table
+               ,@body))
         (save-excursion
            (save-restriction
              (widen)
              (goto-char (point-min))
-             ;; Switching major modes is too drastic, so just switch
-             ;; temporarily to the Emacs Lisp mode syntax table.
              (with-syntax-table emacs-lisp-mode-syntax-table
                ,@body)))))))