MenuEditor.st
changeset 3396 efbf0e6f05b4
parent 3365 51b676d98742
child 3431 ecac7d4db6d0
--- a/MenuEditor.st	Sat Feb 04 21:35:40 2017 +0100
+++ b/MenuEditor.st	Wed Feb 08 01:01:14 2017 +0100
@@ -3957,8 +3957,12 @@
 !MenuEditor::Item methodsFor:'initialization'!
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
     menuItem := MenuItem label:(self class defaultLabel).
+
+    "Modified: / 08-02-2017 / 00:28:44 / cg"
 ! !
 
 !MenuEditor::Item methodsFor:'private'!
@@ -4694,8 +4698,12 @@
 !
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
     children := #().
+
+    "Modified: / 08-02-2017 / 00:28:37 / cg"
 !
 
 updateFromClass:aClass selectorFilter:aFilterBlock
@@ -5195,8 +5203,12 @@
 !MenuEditor::ActionItem methodsFor:'initialization'!
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
     isExpanded := true.
+
+    "Modified: / 08-02-2017 / 00:28:28 / cg"
 ! !
 
 !MenuEditor::ActionItem methodsFor:'queries'!
@@ -5492,8 +5504,10 @@
 !MenuEditor::LinkedMenuItem methodsFor:'initialization'!
 
 initialize
-    "setup default values on the item
-    "
+    "setup default values on the item"
+
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
 
     "setting default values
@@ -5505,6 +5519,8 @@
 
     "/ menuItem keepLinkedMenu:true.
     menuItem keepLinkedMenu:false.
+
+    "Modified (comment): / 08-02-2017 / 00:29:14 / cg"
 ! !
 
 !MenuEditor::LinkedMenuItem methodsFor:'queries'!
@@ -6136,8 +6152,12 @@
 !MenuEditor::RootItem methodsFor:'initialization'!
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
     isExpanded := true.
+
+    "Modified: / 08-02-2017 / 00:29:29 / cg"
 ! !
 
 !MenuEditor::RootItem methodsFor:'queries'!