--- a/TabItem.st	Thu May 30 09:43:18 2019 +0200
+++ b/TabItem.st	Thu May 30 09:44:04 2019 +0200
@@ -836,13 +836,16 @@
     "Modified (comment): / 30-05-2019 / 09:35:40 / Claus Gittinger"
 !
 
-activeHelpKey:aKey
+activeHelpKey:aSymbolicKey
+    "the key used to ask the application for the tooltip text (via helpTextFor:)"
+
     |key|
 
-    aKey size > 0 ifTrue:[key := aKey asSymbol].
+    aSymbolicKey size > 0 ifTrue:[key := aSymbolicKey asSymbol].
     activeHelpKey := key
 
     "Modified: / 06-09-2006 / 14:58:32 / cg"
+    "Modified (comment): / 30-05-2019 / 09:41:34 / Claus Gittinger"
 !
 
 activeHelpText