Mercurial > emacs
changeset 4314:59aa39575936
(iconify-or-deiconify-frame): Make it work.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 27 Jul 1993 22:01:29 +0000 |
| parents | 87472f1eb031 |
| children | 9c6571823ab8 |
| files | lisp/term/x-win.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/x-win.el Tue Jul 27 21:58:54 1993 +0000 +++ b/lisp/term/x-win.el Tue Jul 27 22:01:29 1993 +0000 @@ -464,7 +464,9 @@ (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)