--- a/UIHelpTool.st Wed Feb 08 01:01:14 2017 +0100
+++ b/UIHelpTool.st Wed Feb 08 01:02:22 2017 +0100
@@ -1270,13 +1270,15 @@
!UIHelpTool::ClassItem methodsFor:'instance creation'!
initialize
- "setup defaults
- "
+ "setup defaults"
+
super initialize.
children := OrderedCollection new.
isExpanded := true.
modified := false.
+
+ "Modified: / 08-02-2017 / 01:02:14 / cg"
!
onClass:aClass
@@ -1433,11 +1435,13 @@
!
initialize
- "setup defaults
- "
+ "setup defaults"
+
super initialize.
children := #().
modified := false.
+
+ "Modified: / 08-02-2017 / 01:01:49 / cg"
! !
!UIHelpTool::KeyItem methodsFor:'private'!