# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1174516608 0
# Node ID b521c6db4e1031afa5d4eaa1fbf0439a32b3a742
# Parent  750eeee3d77a4db4e6da8eeb9b43c9b1f75c5ed2
(xterm-mouse-event): Remove unused var `time'.

diff -r 750eeee3d77a -r b521c6db4e10 lisp/xt-mouse.el
--- a/lisp/xt-mouse.el	Wed Mar 21 20:43:49 2007 +0000
+++ b/lisp/xt-mouse.el	Wed Mar 21 22:36:48 2007 +0000
@@ -126,7 +126,6 @@
   (let* ((type (- (xterm-mouse-event-read) #o40))
 	 (x (- (xterm-mouse-event-read) #o40 1))
 	 (y (- (xterm-mouse-event-read) #o40 1))
-	 (time (current-time))
 	 ;; Emulate timestamp information.  This is accurate enough
 	 ;; for default value of mouse-1-click-follows-link (450msec).
 	 (timestamp (truncate
@@ -155,7 +154,7 @@
 	  xterm-mouse-y y)
     (setq
      last-input-event
-     (list mouse 
+     (list mouse
 	   (let ((event (if w
 			    (posn-at-x-y (- x left) (- y top) w t)
 			  (append (list nil 'menu-bar)