--- a/Menu.st	Sun May 06 13:12:45 2018 +0200
+++ b/Menu.st	Thu May 10 21:06:20 2018 +0200
@@ -786,6 +786,10 @@
     "Modified: / 04-10-2013 / 19:28:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+addLabel:aLabel selector:aSelector action:aBlock
+    self addItem:(MenuItem label:aLabel itemValue:aBlock).
+!
+
 addSeparator
     "add a separating line item at the end;
      useful to build a menu programmatically (or, to add more items dynamically)"