diff options
Diffstat (limited to 'lisp/xt-mouse.el')
-rw-r--r-- | lisp/xt-mouse.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el index 5ff718292d3..b53174b7bd5 100644 --- a/lisp/xt-mouse.el +++ b/lisp/xt-mouse.el @@ -245,8 +245,8 @@ which is the \"1006\" extension implemented in Xterm >= 277." ;; for default value of mouse-1-click-follows-link (450msec). (timestamp (if (not xt-mouse-epoch) (progn (setq xt-mouse-epoch (float-time)) 0) - (car (encode-time (time-since xt-mouse-epoch) - 1000)))) + (car (time-convert (time-since xt-mouse-epoch) + 1000)))) (w (window-at x y)) (ltrb (window-edges w)) (left (nth 0 ltrb)) |