more flexible flyByHelpText redefinition
authorClaus Gittinger <cg@exept.de>
Thu, 21 May 2009 16:35:09 +0200
changeset 2544 62e390e651a3
parent 2543 7ad308542625
child 2545 cd5d45739973
more flexible flyByHelpText redefinition
UIPainter.st
--- a/UIPainter.st	Wed May 20 12:47:34 2009 +0200
+++ b/UIPainter.st	Thu May 21 16:35:09 2009 +0200
@@ -3607,6 +3607,12 @@
 
 !UIPainter methodsFor:'help specs'!
 
+basicHelpTextFromSpecification:specification forKey:aKey
+    "redefinable, to allow for subclasses to overwrite the helpTexts of the ui-spec"
+
+    ^ specification helpSpec at:aKey ifAbsent:nil
+!
+
 flyByHelpSpec
     |spec|