From 91ff1c8f7cf5b137b214b0b70a7267d34c1f6b36 Mon Sep 17 00:00:00 2001 From: Torsten Hilbrich Date: Thu, 19 Nov 2020 08:25:42 +0100 Subject: [PATCH] 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 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") -- 2.39.2