--- a/ClassRevisionTree.st	Fri Jan 14 16:05:17 2000 +0100
+++ b/ClassRevisionTree.st	Fri Jan 14 16:13:51 2000 +0100
@@ -267,6 +267,7 @@
     listView := self builder componentAt:#HierarchicalItemListView.
     selectionHolder notNil
         ifTrue:[listView model:selectionHolder].
+    listView useDefaultIcons:false.
 !
 
 release
@@ -431,5 +432,5 @@
 !ClassRevisionTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ClassRevisionTree.st,v 1.4 2000-01-14 15:04:56 ps Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ClassRevisionTree.st,v 1.5 2000-01-14 15:13:51 ps Exp $'
 ! !

--- a/ExpandableRevisionItem.st	Fri Jan 14 16:05:17 2000 +0100
+++ b/ExpandableRevisionItem.st	Fri Jan 14 16:13:51 2000 +0100
@@ -10,14 +10,7 @@
 
 icon
 
-    ^#loadedRevision
-
-
-
-
-
-
-
+    ^nil
 !
 
 revisionString
@@ -64,5 +57,5 @@
 !ExpandableRevisionItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ExpandableRevisionItem.st,v 1.1 2000-01-14 10:51:20 ps Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ExpandableRevisionItem.st,v 1.2 2000-01-14 15:13:02 ps Exp $'
 ! !