--- a/TreeItem.st Mon Jun 14 12:51:45 2010 +0200
+++ b/TreeItem.st Mon Jun 14 13:02:20 2010 +0200
@@ -127,7 +127,7 @@
clsName := aClass name
].
- newInst := super new initialize.
+ newInst := self new.
newInst name:clsName.
aClass isNil ifTrue:[
@@ -1027,7 +1027,11 @@
!TreeItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TreeItem.st,v 1.49 2009-05-20 06:38:48 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TreeItem.st,v 1.50 2010-06-14 11:02:20 cg Exp $'
+!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libwidg2/TreeItem.st,v 1.50 2010-06-14 11:02:20 cg Exp $'
! !
TreeItem initialize!