#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Mon, 16 May 2016 13:29:34 +0200
changeset 16610 0eaa2a36a085
parent 16609 fa1194cb949e
child 16611 961f3a9075f8
#UI_ENHANCEMENT by cg class: Tools::LintAnnotation changed: #helpTextFor:
Tools__LintAnnotation.st
--- a/Tools__LintAnnotation.st	Mon May 16 12:37:21 2016 +0200
+++ b/Tools__LintAnnotation.st	Mon May 16 13:29:34 2016 +0200
@@ -78,6 +78,7 @@
     
     resources := self class classResources.
     rule isComposite ifTrue:[
+        "/ sigh - must collect here, because lint does not know about my resources.
         info := rule rules 
                     collect:[:each | 
                         (resources string:each infoInToolTip)
@@ -91,7 +92,7 @@
     ].
     info isEmptyOrNil ifTrue:[^ nil].
     ^ resources 
-            stringWithCRs:(('Lint says (click on icon for details):' withColor:#gray),'\%1') "/ 'Lint says: %1\Click for more info.' 
+            stringWithCRs:(('Lint says (click on icon for details):\' withColor:#gray),'\%1') "/ 'Lint says: %1\Click for more info.' 
             with:info.
 ! !