procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/xt-mouse.el (xterm-mouse-event): Don't assume last-click is non-nil.

Browse source 
Fixes: debbugs:18015
This commit is contained in:
Stefan Monnier 2014-07-19 12:56:40 -04:00
parent bf0d3f76dc
commit a54493b02f
2 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2014-07-19 Stefan Monnier <monnier@iro.umontreal.ca>
* xt-mouse.el (xterm-mouse-event): Don't assume last-click is non-nil
(bug#18015).
* rect.el (rectangle--string-preview): Don't assume there
a non-nil default (bug#17984).

2
lisp/xt-mouse.el
View file

@ -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)))