From 8c7727c3354291d0798b2eb031f42a32c618c391 Mon Sep 17 00:00:00 2001 From: Martin Rudalics Date: Fri, 26 Oct 2012 11:11:24 +0200 Subject: Fix bug#12731 in mouse-drag-line. * mouse.el (mouse-drag-line): Move last form into preceding when clause (Bug#12731). * help.el (resize-temp-buffer-window): Fix doc-string. --- lisp/mouse.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/mouse.el') diff --git a/lisp/mouse.el b/lisp/mouse.el index fa5c69281de..61d70404bd6 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -517,8 +517,8 @@ must be one of the symbols `header', `mode', or `vertical'." ;; If mouse-2 has never been done by the user, it doesn't have ;; the necessary property to be interpreted correctly. (put 'mouse-2 'event-kind 'mouse-click) - (setcar event 'mouse-2)) - (push event unread-command-events))) + (setcar event 'mouse-2) + (push event unread-command-events)))) (defun mouse-drag-mode-line (start-event) "Change the height of a window by dragging on the mode line." -- cgit v1.2.1