diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/frame.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 95cddb5112e..30573db9e66 100644 --- a/lisp/frame.el +++ b/lisp/frame.el | |||
| @@ -821,9 +821,9 @@ the user during startup." | |||
| 821 | (raise-frame frame) | 821 | (raise-frame frame) |
| 822 | ;; Ensure, if possible, that frame gets input focus. | 822 | ;; Ensure, if possible, that frame gets input focus. |
| 823 | (when (memq (window-system frame) '(x mac w32)) | 823 | (when (memq (window-system frame) '(x mac w32)) |
| 824 | (x-focus-frame frame)) | 824 | (x-focus-frame frame)) |
| 825 | (cond (focus-follows-mouse | 825 | (when focus-follows-mouse |
| 826 | (set-mouse-position (selected-frame) (1- (frame-width)) 0)))) | 826 | (set-mouse-position (selected-frame) (1- (frame-width)) 0))) |
| 827 | 827 | ||
| 828 | (defun other-frame (arg) | 828 | (defun other-frame (arg) |
| 829 | "Select the ARGth different visible frame on current display, and raise it. | 829 | "Select the ARGth different visible frame on current display, and raise it. |