diff lisp/frame.el @ 872:336ffe2bd537

*** empty log message ***

--- a/lisp/frame.el	Fri Jul 24 23:48:49 1992 +0000
+++ b/lisp/frame.el	Sat Jul 25 00:36:12 1992 +0000
@@ -193,22 +193,6 @@
   (funcall frame-creation-function parameters))
 
 
-;;;; Iconification
-
-;;; A possible enhancement for the below: if you iconify a surrogate
-;;; minibuffer frame, iconify all of its minibuffer's users too; 
-;;; de-iconify them as a group.  This will need to wait until frames
-;;; have mapping and unmapping hooks.
-
-(defun iconify ()
-  "Iconify or deiconify the selected frame."
-  (interactive)
-  (let ((frame (selected-frame)))
-    (if (eq (frame-visible-p frame) t)
-	(iconify-frame frame)
-      (make-frame-visible frame))))
-
-
 ;;;; Frame configurations
 
 (defun current-frame-configuration ()