From: Torsten Hilbrich <torsten.hilbrich@gmx.net>
Date: Thu, 19 Nov 2020 07:25:42 +0000 (+0100)
Subject: Move placement of dictionary-tooltip-mouse-event
X-Git-Tag: emacs-28.0.90~4726^2~19
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=91ff1c8f7c;p=emacs.git

Move placement of dictionary-tooltip-mouse-event

* lisp/net/dictionary.el (dictionary-tooltip-mouse-event): Place
variable before dictionary-display-tooltip to avoid warning about use of
free variable when compiling dictionary-display-tooltip
---

diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index a1d4ac9214e..1e1d4d9d444 100644
--- a/lisp/net/dictionary.el
+++ b/lisp/net/dictionary.el
@@ -1249,6 +1249,9 @@ It presents the word at point as default input and allows editing it."
           (goto-char point)
         (current-word))))))
 
+(defvar dictionary-tooltip-mouse-event nil
+  "Event that triggered the tooltip mode")
+
 (defun dictionary-display-tooltip (event)
   "Search the current word in the `dictionary-tooltip-dictionary'."
   (interactive "e")
@@ -1263,9 +1266,6 @@ It presents the word at point as default input and allows editing it."
         t)
     nil))
 
-(defvar dictionary-tooltip-mouse-event nil
-  "Event that triggered the tooltip mode")
-
 (defun dictionary-tooltip-track-mouse (event)
   "Called whenever a dictionary tooltip display is about to be triggered."
   (interactive "e")