diff options
| author | Geoff Voelker <voelker@cs.washington.edu> | 1997-09-02 19:39:14 +0000 |
|---|---|---|
| committer | Geoff Voelker <voelker@cs.washington.edu> | 1997-09-02 19:39:14 +0000 |
| commit | 9d702ce661feca4d2ae568d4acf89ccac9ba0701 (patch) | |
| tree | bf0c79b705284e0846566512a9c81f844a2e5960 /lisp/frame.el | |
| parent | b1667e6c861b23b17667bdfaa1a06b9a6042b5af (diff) | |
| download | emacs-9d702ce661feca4d2ae568d4acf89ccac9ba0701.tar.gz | |
(other-frame) [windows-nt]: Use w32-focus-frame.
Diffstat (limited to 'lisp/frame.el')
| -rw-r--r-- | lisp/frame.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index cd23db06c08..96d103e1229 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -516,7 +516,10 @@ A negative ARG moves in the opposite order." (setq arg (1+ arg))) (raise-frame frame) (select-frame frame) - (set-mouse-position (selected-frame) (1- (frame-width)) 0))) + ;; Ensure, if possible, that frame gets input focus. + (if (eq window-system 'w32) + (w32-focus-frame frame) + (set-mouse-position (selected-frame) (1- (frame-width)) 0)))) ;;;; Frame configurations |