Commit 05e89fea authored by Chong Yidong's avatar Chong Yidong
Browse files

* mouse.el (mouse-drag-track): Deactivate the mark before popping.

parent 96512555
2012-06-23 Chong Yidong <cyd@gnu.org> 2012-06-23 Chong Yidong <cyd@gnu.org>
   
* mouse.el (mouse-drag-track): Deactivate the mark before popping.
* progmodes/python.el (python-skeleton-define): Mark abbrevs as * progmodes/python.el (python-skeleton-define): Mark abbrevs as
system abbrevs. system abbrevs.
   
......
...@@ -884,10 +884,15 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by ...@@ -884,10 +884,15 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by
(copy-region-as-kill (mark) (point))))) (copy-region-as-kill (mark) (point)))))
;; Otherwise, run binding of terminating up-event. ;; Otherwise, run binding of terminating up-event.
(cond (setq foo (list (window-buffer (selected-window))
(do-multi-click (goto-char start-point)) (current-buffer)))
(moved-off-start (deactivate-mark))
(t (pop-mark))) (if do-multi-click
(goto-char start-point)
(deactivate-mark)
(unless moved-off-start
(pop-mark)))
(when (and (functionp fun) (when (and (functionp fun)
(= start-hscroll (window-hscroll start-window)) (= start-hscroll (window-hscroll start-window))
;; Don't run the up-event handler if the window ;; Don't run the up-event handler if the window
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment