summaryrefslogtreecommitdiff
path: root/lisp/term
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-07-27 22:01:29 +0000
committerRichard M. Stallman <rms@gnu.org>1993-07-27 22:01:29 +0000
commitc88aa5fbb8a678ad72a7e5703129fc3d73bf5928 (patch)
tree052e1fdc07fbf3795387836554843696102cac51 /lisp/term
parent7d8b615bcc3f29df5427d0ba0b6fe1df69c7ea87 (diff)
downloademacs-c88aa5fbb8a678ad72a7e5703129fc3d73bf5928.tar.gz
(iconify-or-deiconify-frame): Make it work.
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/x-win.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 3fe85424e3f..5ff135d1a3a 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -464,7 +464,9 @@ This returns ARGS with the arguments that have been processed removed."
(interactive)
(if (eq (cdr (assq 'visibility (frame-parameters))) t)
(iconify-frame)
- (make-frame-visible)))
+ (let ((foo (selected-frame)))
+ (make-frame-invisible foo)
+ (make-frame-visible foo))))
(substitute-key-definition 'suspend-emacs 'iconify-or-deiconify-frame
global-map)