* lisp/mouse.el (mouse-drag-line): Don't re-add to unread-comment-events,

since it's already done inside the loop	(bug#17819).
This commit is contained in:
Stefan Monnier 2014-06-20 14:35:04 -04:00
parent 9754868705
commit f49b49787c
2 changed files with 9 additions and 4 deletions

View file

@ -1,3 +1,8 @@
2014-06-20 Stefan Monnier <monnier@iro.umontreal.ca>
* mouse.el (mouse-drag-line): Don't re-add to unread-comment-events,
since it's already done inside the loop (bug#17819).
2014-06-20 Martin Rudalics <rudalics@gmx.at>
* mouse.el (mouse-drag-line): Re-remove code initially removed
@ -6,6 +11,9 @@
2014-06-20 Stefan Monnier <monnier@iro.umontreal.ca>
* mouse.el (mouse-drag-line): Remove left-over code made redundant by
mouse--down-1-maybe-follows-link (bug#17819).
* progmodes/sh-script.el (sh-smie-sh-rules): For { after &&, don't
align with the surrounding parent (bug#17721).

View file

@ -485,10 +485,7 @@ must be one of the symbols `header', `mode', or `vertical'."
(unless (zerop growth)
(setq dragged t)
(adjust-window-trailing-edge
window (if (eq line 'mode) growth (- growth)) nil t))))))
;; Process the terminating event.
(unless dragged
(push event unread-command-events))))
window (if (eq line 'mode) growth (- growth)) nil t))))))))
(defun mouse-drag-mode-line (start-event)
"Change the height of a window by dragging on the mode line."