* lisp/net/dictionary.el (dictionary-tooltip-mode): Use setq-local

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index 1596e11ce47aeef670c40d4a0d614f5aaa7f7b6f..afa4d393c0d808536a4c1987625dca630db96fc2 100644 (file)
--- a/lisp/net/dictionary.el
+++ b/lisp/net/dictionary.el
@@ -1297,11 +1297,9 @@ overwrite that mode for the current buffer.
   (let ((on (if arg
                 (> (prefix-numeric-value arg) 0)
               (not dictionary-tooltip-mode))))
-    (make-local-variable 'dictionary-tooltip-mode)
-    (setq dictionary-tooltip-mode on)
-    (make-local-variable 'track-mouse)
+    (setq-local dictionary-tooltip-mode on)
+    (setq-local track-mouse on)
     (make-local-variable 'dictionary-tooltip-mouse-event)
-    (setq track-mouse on)
     (dictionary-switch-tooltip-mode 1)
     (if on
         (local-set-key [mouse-movement] 'dictionary-tooltip-track-mouse)