# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 752764445 0
# Node ID 04dee67f86cf7fd8c304b1f68bb6b6185ec13301
# Parent  2b5e416494d187259820f5fe17874330b7974144
(set-frame-configuration): Iconify frames
rather than making them invisible.

diff -r 2b5e416494d1 -r 04dee67f86cf lisp/frame.el
--- a/lisp/frame.el	Mon Nov 08 12:47:05 1993 +0000
+++ b/lisp/frame.el	Mon Nov 08 13:14:05 1993 +0000
@@ -403,7 +403,7 @@
 configuration, and other parameters set as specified in CONFIGURATION.
 Ordinarily, this function deletes all existing frames not
 listed in CONFIGURATION.  But if optional second argument NODELETE
-is given and non-nil, the unwanted frames are made invisible instead."
+is given and non-nil, the unwanted frames are iconified instead."
   (or (frame-configuration-p configuration)
       (signal 'wrong-type-argument
 	      (list 'frame-configuration-p configuration)))
@@ -426,7 +426,11 @@
 		   (setq frames-to-delete (cons frame frames-to-delete))))))
 	    (frame-list))
     (if nodelete
-	(mapcar 'make-frame-invisible frames-to-delete)
+	;; Note: making frames invisible here was tried
+	;; but led to some strange behavior--each time the frame
+	;; was made visible again, the window manager asked afresh
+	;; for where to put it.
+	(mapcar 'iconify-frame frames-to-delete)
       (mapcar 'delete-frame frames-to-delete))))
 
 (defun frame-configuration-p (object)