From 429146fcad08b2a3188dccefaf52a5c1e8257402 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Wed, 21 Mar 2007 22:36:48 +0000 Subject: [PATCH] (xterm-mouse-event): Remove unused var `time'. --- lisp/xt-mouse.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el index e83911a78fc..963ed0238ed 100644 --- a/lisp/xt-mouse.el +++ b/lisp/xt-mouse.el @@ -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) -- 2.39.5