diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-12-27 16:35:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-12-27 16:35:17 +0000 |
| commit | f57d50e70dbe961e2e0bfeb2b9bfd8e8a5ffbe88 (patch) | |
| tree | f508a9fbeb085fc4745729978d1a6b2516d175da /lisp/mouse.el | |
| parent | e967cd114c37474fc7f91c358e4b06fb7ce653d8 (diff) | |
| download | emacs-f57d50e70dbe961e2e0bfeb2b9bfd8e8a5ffbe88.tar.gz | |
(mouse-drag-region): Bind mouse-autoselect-window.
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 91e2e4ae5c6..63e0f6c9d91 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -754,7 +754,8 @@ remains active. Otherwise, it remains until the next input event. If the click is in the echo area, display the `*Messages*' buffer." (interactive "e") - (let ((w (posn-window (event-start start-event)))) + (let ((w (posn-window (event-start start-event))) + (mouse-autoselect-window nil)) (if (not (or (not (window-minibuffer-p w)) (minibuffer-window-active-p w))) (save-excursion |