--- a/SelectionInTree.st	Tue Aug 02 13:31:14 2005 +0200
+++ b/SelectionInTree.st	Tue Aug 02 15:14:45 2005 +0200
@@ -63,7 +63,7 @@
 !SelectionInTree class methodsFor:'instance creation'!
 
 new
-    ^ super new initialize
+    ^ self basicNew initialize
 ! !
 
 !SelectionInTree class methodsFor:'defaults'!
@@ -576,9 +576,6 @@
     indicatorList := OrderedCollection new.
     accessLock    := Semaphore forMutualExclusion.
     list          := List new.
-
-    super initialize.
-
 ! !
 
 !SelectionInTree methodsFor:'private'!
@@ -946,5 +943,5 @@
 !SelectionInTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.33 2004-04-02 18:19:09 werner Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTree.st,v 1.34 2005-08-02 13:14:45 cg Exp $'
 ! !