[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/integration-of-dictionary-el 91ff1c8 2/2: Move placement of dict
From: |
Torsten Hilbrich |
Subject: |
feature/integration-of-dictionary-el 91ff1c8 2/2: Move placement of dictionary-tooltip-mouse-event |
Date: |
Thu, 19 Nov 2020 02:29:54 -0500 (EST) |
branch: feature/integration-of-dictionary-el
commit 91ff1c8f7cf5b137b214b0b70a7267d34c1f6b36
Author: Torsten Hilbrich <torsten.hilbrich@gmx.net>
Commit: Torsten Hilbrich <torsten.hilbrich@gmx.net>
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
---
lisp/net/dictionary.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/net/dictionary.el b/lisp/net/dictionary.el
index a1d4ac9..1e1d4d9 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")