summaryrefslogtreecommitdiff
path: root/lisp/xt-mouse.el
diff options
context:
space:
mode:
authorNick Roberts <nickrob@snap.net.nz>2007-03-21 20:43:49 +0000
committerNick Roberts <nickrob@snap.net.nz>2007-03-21 20:43:49 +0000
commit4c8bb950f03940bbccae0daece30d334019b90d4 (patch)
treea7505704845c42f30cd0ab7b6f6e277585c52909 /lisp/xt-mouse.el
parenta7dc2df1b3f82a1d04432317cd7d2a9104e63273 (diff)
downloademacs-4c8bb950f03940bbccae0daece30d334019b90d4.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp/xt-mouse.el')
-rw-r--r--lisp/xt-mouse.el2
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)