From c625fb645afc75fb2b2ece771feb9472937c192d Mon Sep 17 00:00:00 2001 From: Alexander Gramiak Date: Thu, 5 Oct 2017 13:50:02 +0300 Subject: [PATCH] Set xterm click count to 1 even with no last click * lisp/xt-mouse.el (xterm-mouse-event): Move the check for the last click so that click-count is initialized properly. Handle the value of t for double-click-time. (Bug#28658) --- lisp/xt-mouse.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el index 772a72d5c50..d268e1a3fe7 100644 --- a/lisp/xt-mouse.el +++ b/lisp/xt-mouse.el @@ -288,8 +288,10 @@ which is the \"1006\" extension implemented in Xterm >= 277." (string-match "down-" last-name) (equal name (replace-match "" t t last-name))) (xterm-mouse--set-click-count event click-count))) - ((not last-time) nil) - ((and (> double-click-time (* 1000 (- this-time last-time))) + ((and last-time + double-click-time + (or (eq double-click-time t) + (> double-click-time (* 1000 (- this-time last-time)))) (equal last-name (replace-match "" t t name))) (setq click-count (1+ click-count)) (xterm-mouse--set-click-count event click-count)) -- 2.39.5