From: Torsten Hilbrich <torsten.hilbrich@gmx.net>
Date: Mon, 14 Dec 2020 08:40:33 +0000 (+0100)
Subject: * lisp/net/dictionary.el (dictionary-tooltip-mode): Use setq-local
X-Git-Tag: emacs-28.0.90~4726^2~6
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d30618cbc1;p=emacs.git

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

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index 1596e11ce47..afa4d393c0d 100644
--- 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)