summaryrefslogtreecommitdiff
path: root/lisp/completion-preview.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2024-01-02 19:10:33 +0200
committerEli Zaretskii <eliz@gnu.org>2024-01-02 19:10:33 +0200
commit7592c3a6e0d9dc50d818bd0499b8a074b265f666 (patch)
treebef893baf6d0498c33a6f4ef2de9b89db5b52884 /lisp/completion-preview.el
parentb37676642679a9ec3cd3b995cd14a4af3567cf80 (diff)
downloademacs-7592c3a6e0d9dc50d818bd0499b8a074b265f666.tar.gz
; Fix compilation errors in completion-preview.el
* lisp/completion-preview.el (mouse-wheel-up-event) (mouse-wheel-up-alternate-event, mouse-wheel-down-event) (mouse-wheel-down-alternate-event): Defvar, to avoid warnings and errors in builds --without-x. (Bug#68213)
Diffstat (limited to 'lisp/completion-preview.el')
-rw-r--r--lisp/completion-preview.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/completion-preview.el b/lisp/completion-preview.el
index da4afb8f66a..baadb4714b1 100644
--- a/lisp/completion-preview.el
+++ b/lisp/completion-preview.el
@@ -128,6 +128,10 @@ If this option is nil, these commands do not display any message."
;; "M-p" #'completion-preview-prev-candidate
)
+(defvar mouse-wheel-up-event)
+(defvar mouse-wheel-up-alternate-event)
+(defvar mouse-wheel-down-event)
+(defvar mouse-wheel-down-alternate-event)
(defvar-keymap completion-preview--mouse-map
:doc "Keymap for mouse clicks on the completion preview."
"<down-mouse-1>" #'completion-preview-insert