mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(iconify-or-deiconify-frame): Make it work.

Browse source
This commit is contained in:
Richard M. Stallman 1993-07-27 22:01:29 +00:00
parent 2d7bfcc3ed
commit 8a96eef3f3
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/term/x-win.el
View file

@ -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)