From 4c8bb950f03940bbccae0daece30d334019b90d4 Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Wed, 21 Mar 2007 20:43:49 +0000 Subject: *** empty log message *** --- lisp/xt-mouse.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/xt-mouse.el') 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) -- cgit v1.2.1