--- a/SelInTree.st	Fri Oct 09 16:16:34 1998 +0200
+++ b/SelInTree.st	Sun Oct 11 12:30:26 1998 +0200
@@ -504,10 +504,11 @@
 
 initialize
 
-    showRoot := true.
+    showRoot      := true.
     indicatorList := OrderedCollection new.
     accessLock    := Semaphore forMutualExclusion.
-    list          := OrderedCollection new:128.
+    list          := List new.
+
     super initialize.
 
 ! !
@@ -813,5 +814,5 @@
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.17 1998-09-28 09:58:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelInTree.st,v 1.18 1998-10-11 10:30:26 cg Exp $'
 ! !

--- a/SelectionInTree.st	Fri Oct 09 16:16:34 1998 +0200
+++ b/SelectionInTree.st	Sun Oct 11 12:30:26 1998 +0200
@@ -504,10 +504,11 @@
 
 initialize
 
-    showRoot := true.
+    showRoot      := true.
     indicatorList := OrderedCollection new.
     accessLock    := Semaphore forMutualExclusion.
-    list          := OrderedCollection new:128.
+    list          := List new.
+
     super initialize.
 
 ! !
@@ -813,5 +814,5 @@
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.17 1998-09-28 09:58:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.18 1998-10-11 10:30:26 cg Exp $'
 ! !