[Emacs-diffs] Changes to emacs/lisp/xt-mouse.el,v

[Nick Roberts]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Nick Roberts <nickrob>  07/03/21 20:43:49

Index: xt-mouse.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/xt-mouse.el,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -b -r1.36 -r1.37
--- xt-mouse.el 21 Mar 2007 20:41:23 -0000      1.36
+++ xt-mouse.el 21 Mar 2007 20:43:49 -0000      1.37
@@ -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)