(xterm-mouse-event): Remove unused var `time'.

1 files changed, 1 insertions, 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)