changeset 23823:d60ff4432412

(xterm-mouse-mode): Pacify the byte compiler.
author Markus Rost <rost@math.uni-bielefeld.de>
date Sat, 05 Dec 1998 18:23:14 +0000
parents 34fa38b26638
children ac5d1cd520fa
files lisp/xt-mouse.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/xt-mouse.el	Sat Dec 05 18:18:50 1998 +0000
+++ b/lisp/xt-mouse.el	Sat Dec 05 18:23:14 1998 +0000
@@ -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)))