--- a/TopView.st	Mon Jan 24 17:34:12 2000 +0100
+++ b/TopView.st	Tue Jan 25 11:58:33 2000 +0100
@@ -11,7 +11,7 @@
 "
 
 View subclass:#TopView
-	instanceVariableNames:'type'
+	instanceVariableNames:'type iconified'
 	classVariableNames:'TakeFocusWhenMapped'
 	poolDictionaries:''
 	category:'Views-Basic'
@@ -671,5 +671,5 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.65 2000-01-17 11:13:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.66 2000-01-25 10:58:33 cg Exp $'
 ! !