Fix and improve mouse-dragging of horizontal/vertical lines.
authorMartin Rudalics <rudalics@gmx.at>
Fri, 21 Oct 2011 09:15:32 +0000 (11:15 +0200)
committerMartin Rudalics <rudalics@gmx.at>
Fri, 21 Oct 2011 09:15:32 +0000 (11:15 +0200)
commite07b9a6d33fedd63f424c0e7627cbf680cbf3b6f
tree307557ece9c75b55af524cdf42d9f92bcba8dfcc
parent7e1361d995cba156dd4b14ac4ba236bf90908d46
Fix and improve mouse-dragging of horizontal/vertical lines.

* mouse.el (mouse-drag-window-above)
(mouse-drag-move-window-bottom, mouse-drag-move-window-top)
(mouse-drag-mode-line-1, mouse-drag-header-line)
(mouse-drag-vertical-line-rightward-window): Remove.
(mouse-drag-line): New function.
(mouse-drag-mode-line, mouse-drag-header-line)
(mouse-drag-vertical-line): Call mouse-drag-line.
* window.el (window-at-side-p, windows-at-side): New functions.
lisp/ChangeLog
lisp/mouse.el
lisp/window.el