--- a/ClassItemRoot.st	Fri Jan 14 15:12:46 2000 +0100
+++ b/ClassItemRoot.st	Fri Jan 14 16:05:17 2000 +0100
@@ -6,8 +6,22 @@
 !
 
 
+!ClassItemRoot methodsFor:'initialization'!
+
+initialize
+    super initialize.
+    isExpanded := true.
+! !
+
+!ClassItemRoot methodsFor:'queries'!
+
+canCollapse
+    ^ false
+
+! !
+
 !ClassItemRoot class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ClassItemRoot.st,v 1.1 2000-01-14 14:08:06 ps Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ClassItemRoot.st,v 1.2 2000-01-14 15:05:17 ps Exp $'
 ! !