Mercurial > emacs

changeset 76660:b521c6db4e10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(xterm-mouse-event): Remove unused var `time'.
author Kim F. Storm <storm@cua.dk>
date Wed, 21 Mar 2007 22:36:48 +0000
parents 750eeee3d77a
children bbab28c8af04
files lisp/xt-mouse.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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)