class: Tools::LintHighlighter
authorClaus Gittinger <cg@exept.de>
Wed, 26 Feb 2014 19:00:31 +0100
changeset 14068 9b5814b4dd3c
parent 14067 b13533a1cab2
child 14069 c1ead71a65d9
class: Tools::LintHighlighter changed: #format:tree:rule: fixed selectionIntervals (comment must generate range of token, not of node)
Tools__LintHighlighter.st
--- a/Tools__LintHighlighter.st	Wed Feb 26 16:11:55 2014 +0100
+++ b/Tools__LintHighlighter.st	Wed Feb 26 19:00:31 2014 +0100
@@ -245,7 +245,7 @@
     string := text string.
     rule result isParseTreeEnvironment ifTrue:[
         formattingMethod ifTrue:[
-            rule result selectionIntervalsForSource: string tree: tree do: [:interval|
+            rule resultSelectionIntervalsForSource: string tree: tree do: [:interval|
                 interval notEmptyOrNil ifTrue:[
                     (interval first == 1 and:[interval last == text size]) ifTrue:[
                         (OperatingSystem getLoginName = 'jv') ifTrue:[
@@ -305,10 +305,10 @@
 !LintHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.6 2014-02-05 18:57:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.7 2014-02-26 18:00:31 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.6 2014-02-05 18:57:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.7 2014-02-26 18:00:31 cg Exp $'
 ! !