--- a/HierarchyNode.st	Fri Jul 04 20:39:02 1997 +0200
+++ b/HierarchyNode.st	Fri Jul 04 20:42:20 1997 +0200
@@ -56,8 +56,7 @@
 !HierarchyNode class methodsFor:'instance creation'!
 
 new
-
-	^super new initialize
+        ^ self basicNew initialize
 !
 
 newAsTreeFromSmalltalkClass:aClass
@@ -599,5 +598,5 @@
 !HierarchyNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchyNode.st,v 1.10 1997-07-03 10:59:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchyNode.st,v 1.11 1997-07-04 18:42:20 ca Exp $'
 ! !