Mercurial > emacs

changeset 66021:2770ea5d8a68

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mouse-drag-region-1): Don't try to catch a double-click when doing follow-link (it's overridden anyway).
author Chong Yidong <cyd@stupidchicken.com>
date Tue, 11 Oct 2005 15:30:31 +0000
parents 337b118104a5
children 4d2d767965d3
files lisp/mouse.el
diffstat 1 files changed, 1 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse.el	Tue Oct 11 15:18:36 2005 +0000
+++ b/lisp/mouse.el	Tue Oct 11 15:30:31 2005 +0000
@@ -1026,10 +1026,7 @@
                                     (and (integerp t0) (integerp t1)
                                          (if (> mouse-1-click-follows-link 0)
                                              (<= (- t1 t0) mouse-1-click-follows-link)
-                                           (< (- t0 t1) mouse-1-click-follows-link)))))
-                              (or (not double-click-time)
-                                  (sit-for 0 (if (integerp double-click-time)
-                                                 double-click-time 500) t)))))
+                                           (< (- t0 t1) mouse-1-click-follows-link))))))))
 		    (if (or (vectorp on-link) (stringp on-link))
 			(setq event (aref on-link 0))
 		      (setcar event 'mouse-2)))