*** empty log message ***

1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el
index f4634a72ff5..e83911a78fc 100644
--- a/lisp/xt-mouse.el
+++ b/lisp/xt-mouse.el
@@ -127,6 +127,8 @@
          (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
                      (* 1000
                         (- (float-time)