--- a/MenuEditor.st	Mon Jul 28 10:37:01 1997 +0200
+++ b/MenuEditor.st	Mon Jul 28 10:41:31 1997 +0200
@@ -555,24 +555,29 @@
                      #(
                        #(#MenuItem
                           #'label:' 'cut'
+                          #'value:' #doCut
                       )
                        #(#MenuItem
                           #'label:' '='
                       )
                        #(#MenuItem
                           #'label:' 'create submenu static'
+                          #'value:' #doCreateMenu
                       )
                        #(#MenuItem
                           #'label:' 'create summenu dynamic'
+                          #'value:' #doCreateLink
                       )
                        #(#MenuItem
                           #'label:' '-'
                       )
                        #(#MenuItem
                           #'label:' 'create item'
+                          #'value:' #doCreateItem
                       )
                        #(#MenuItem
                           #'label:' 'create separator'
+                          #'value:' #doCreateSep
                       )
                     ) nil
                     nil
@@ -621,7 +626,7 @@
           nil
       )
 
-    "Modified: 28.7.1997 / 10:18:15 / cg"
+    "Modified: 28.7.1997 / 10:40:15 / cg"
 !
 
 windowSpec