Tools__LintRuleDetail.st
changeset 16526 1510e5d4c2ad
parent 15837 95f2b67f68e8
child 16571 cf319f2e56d0
child 17290 ffe3a898f0a4
--- a/Tools__LintRuleDetail.st	Mon May 09 17:55:31 2016 +0200
+++ b/Tools__LintRuleDetail.st	Tue May 10 11:16:55 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  Copyright (c) 2007-2010 Jan Vrany, SWING Research Group, Czech Technical University in Prague
  Copyright (c) 2009-2010 eXept Software AG
@@ -295,7 +293,7 @@
         holder := BlockValue
                     with:[:h | 
                         "/ h displayString , ' ' , (('[browse]' actionForAll:[ self browseLintRule]) colorizeAllWith:Color blue) 
-                        (h ? '') displayString actionForAll:[ self browseLintRule ] 
+                        (h ? '') displayString asActionLinkTo:[ self browseLintRule ] 
                     ]
                     argument: self ruleHolder.
         builder aspectAt:#ruleNameAspect put:holder.