Commit 3dfc5cd6 authored by Martin Rudalics's avatar Martin Rudalics
Browse files

In mouse-autoselect-window-select do autoselect when mouse pointer is on margin.

* window.el (mouse-autoselect-window-select): Do autoselect when
mouse pointer is on margin.
parent 90769946
2013-08-16 Martin Rudalics <rudalics@gmx.at>
* window.el (mouse-autoselect-window-select): Do autoselect when
mouse pointer is on margin.
2013-08-16 William Parsons <wbparsons@alum.mit.edu> (tiny change)
* net/ange-ftp.el (ange-ftp-skip-msgs): Add 500 EPSV. (Bug#1972)
......
......@@ -6680,8 +6680,10 @@ is active. This function is run by `mouse-autoselect-window-timer'."
(cond
((or (menu-or-popup-active-p)
(and window
(not (consp (coordinates-in-window-p
(cdr mouse-position) window)))))
(let ((coords (coordinates-in-window-p
(cdr mouse-position) window)))
(and (not (consp coords))
(not (memq coords '(left-margin right-margin)))))))
;; A menu / popup dialog is active or the mouse is not on the
;; text region of WINDOW: Suspend autoselection temporarily.
(mouse-autoselect-window-start mouse-position nil t))
......
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