summaryrefslogtreecommitdiff
path: root/lisp/xt-mouse.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2014-07-19 12:56:40 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2014-07-19 12:56:40 -0400
commita54493b02fc90ab163aa88dfe68c2b5e44a2536e (patch)
tree575094ed03b4a02cc3cb94595725222c6dfadae7 /lisp/xt-mouse.el
parentbf0d3f76dcfe7881cb3058169b51cf6602fdcdcb (diff)
downloademacs-a54493b02fc90ab163aa88dfe68c2b5e44a2536e.tar.gz
* lisp/xt-mouse.el (xterm-mouse-event): Don't assume last-click is non-nil.
Fixes: debbugs:18015
Diffstat (limited to 'lisp/xt-mouse.el')
-rw-r--r--lisp/xt-mouse.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el
index 59f1eb8c887..cad3151b244 100644
--- a/lisp/xt-mouse.el
+++ b/lisp/xt-mouse.el
@@ -250,7 +250,7 @@ which is the \"1006\" extension implemented in Xterm >= 277."
((not (string-match "down-" name))
;; For up events, make the up side match the down side.
(setq this-time last-time)
- (when (and (> click-count 1)
+ (when (and click-count (> click-count 1)
(string-match "down-" last-name)
(equal name (replace-match "" t t last-name)))
(xterm-mouse--set-click-count event click-count)))