--- a/MenuPanel.st	Wed Jan 31 14:45:56 2018 +0100
+++ b/MenuPanel.st	Thu Feb 01 14:03:21 2018 +0100
@@ -7096,8 +7096,21 @@
             ].
         ].
     ].
+
+    "/ usually not helpful:
+    "/  a) must care for ampersand in labels
+    "/  b) only helpful if label is an icon
     text isNil ifTrue:[
-        ^ self rawLabel
+        app notNil ifTrue:[
+            key := self rawLabel.
+            key notEmptyOrNil ifTrue:[
+                key := String withoutAmpersandEscapes:key.
+                text := app helpTextForKey:key.
+                text = key ifTrue:[
+                    text := nil.
+                ].
+            ]
+        ].
     ].
     ^ text
 !