From 54eba3537bd62c0f869cc0be64633d4959e48219 Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Sat, 5 Dec 1998 18:23:14 +0000 Subject: [PATCH] (xterm-mouse-mode): Pacify the byte compiler. --- lisp/xt-mouse.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el index dbd741e5e6c..66afcb016a7 100644 --- a/lisp/xt-mouse.el +++ b/lisp/xt-mouse.el @@ -100,6 +100,9 @@ (defvar xterm-mouse-y 0 "Position of last xterm mouse event relative to the frame.") +;; Indicator for the xterm-mouse mode. +(defvar xterm-mouse-mode nil) + (defadvice mouse-position (around xterm-mouse activate) "Use last key from xterm-mouse-mode if available." (let ((answer ad-do-it)) @@ -141,9 +144,6 @@ (list window pos point (/ (nth 2 (current-time)) 1000))))) -;; Indicator for the xterm-mouse mode. -(defvar xterm-mouse-mode nil) - (or (assq 'xterm-mouse-mode minor-mode-alist) (setq minor-mode-alist (cons '(xterm-mouse-mode (" Mouse")) minor-mode-alist))) -- 2.39.2