# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 912882194 0
# Node ID d60ff44324120a2d2cee62d4baf6ef2e613f0732
# Parent  34fa38b2663823a9cb07d4fc7726187d740b809b
(xterm-mouse-mode): Pacify the byte compiler.

diff -r 34fa38b26638 -r d60ff4432412 lisp/xt-mouse.el
--- 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)))