diff options
| author | Richard M. Stallman | 1996-09-03 21:37:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-03 21:37:35 +0000 |
| commit | e1877477ee97faf5cf326d2b4d701af3567ac599 (patch) | |
| tree | c687e18b50d0ce54b093deb8dc344943240ff95f /lisp | |
| parent | 6469b6d26b6a3abe42953da81726b8575469d205 (diff) | |
| download | emacs-e1877477ee97faf5cf326d2b4d701af3567ac599.tar.gz emacs-e1877477ee97faf5cf326d2b4d701af3567ac599.zip | |
(mouse-select-window): Don't call unfocus-frame.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mouse.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index cbddd2cacdd..c7f333c8332 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -130,8 +130,7 @@ This must be bound to a mouse click." | |||
| 130 | (raise-frame frame) | 130 | (raise-frame frame) |
| 131 | (select-frame frame) | 131 | (select-frame frame) |
| 132 | (or (eq frame oframe) | 132 | (or (eq frame oframe) |
| 133 | (set-mouse-position (selected-frame) (1- (frame-width)) 0)) | 133 | (set-mouse-position (selected-frame) (1- (frame-width)) 0)))) |
| 134 | (unfocus-frame))) | ||
| 135 | 134 | ||
| 136 | (defun mouse-tear-off-window (click) | 135 | (defun mouse-tear-off-window (click) |
| 137 | "Delete the window clicked on, and create a new frame displaying its buffer." | 136 | "Delete the window clicked on, and create a new frame displaying its buffer." |