* lisp/mouse.el (mouse-drag-track): Always deactivate the mark before
running the final event's command since that command is in charge of activating the mark if needed. Fixes: debbugs:13523
This commit is contained in:
parent
dc2bc29527
commit
13841bfcc2
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,9 @@
|
|||
2013-02-01 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* mouse.el (mouse-drag-track): Always deactivate the mark before
|
||||
running the final event's command since that command is in charge of
|
||||
activating the mark if needed (bug#13523).
|
||||
|
||||
2013-02-01 Juri Linkov <juri@jurta.org>
|
||||
|
||||
* replace.el (perform-replace): Move let-bindings of isearch-*
|
||||
|
|
|
@ -880,9 +880,9 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by
|
|||
(copy-region-as-kill (mark) (point)))))
|
||||
|
||||
;; Otherwise, run binding of terminating up-event.
|
||||
(deactivate-mark)
|
||||
(if do-multi-click
|
||||
(goto-char start-point)
|
||||
(deactivate-mark)
|
||||
(unless moved-off-start
|
||||
(pop-mark)))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue