diff options
| author | Richard M. Stallman | 2004-12-27 16:35:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-12-27 16:35:17 +0000 |
| commit | f57d50e70dbe961e2e0bfeb2b9bfd8e8a5ffbe88 (patch) | |
| tree | f508a9fbeb085fc4745729978d1a6b2516d175da | |
| parent | e967cd114c37474fc7f91c358e4b06fb7ce653d8 (diff) | |
| download | emacs-f57d50e70dbe961e2e0bfeb2b9bfd8e8a5ffbe88.tar.gz emacs-f57d50e70dbe961e2e0bfeb2b9bfd8e8a5ffbe88.zip | |
(mouse-drag-region): Bind mouse-autoselect-window.
| -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. | |||
| 754 | 754 | ||
| 755 | If the click is in the echo area, display the `*Messages*' buffer." | 755 | If the click is in the echo area, display the `*Messages*' buffer." |
| 756 | (interactive "e") | 756 | (interactive "e") |
| 757 | (let ((w (posn-window (event-start start-event)))) | 757 | (let ((w (posn-window (event-start start-event))) |
| 758 | (mouse-autoselect-window nil)) | ||
| 758 | (if (not (or (not (window-minibuffer-p w)) | 759 | (if (not (or (not (window-minibuffer-p w)) |
| 759 | (minibuffer-window-active-p w))) | 760 | (minibuffer-window-active-p w))) |
| 760 | (save-excursion | 761 | (save-excursion |