fixes
authorvrany
Fri, 05 Aug 2011 15:06:38 +0200
changeset 10503 a01809c3af32
parent 10502 3e033a03724b
child 10504 9bf895b3e73d
fixes
Tools__LintHighlighter.st
--- a/Tools__LintHighlighter.st	Fri Aug 05 14:58:30 2011 +0200
+++ b/Tools__LintHighlighter.st	Fri Aug 05 15:06:38 2011 +0200
@@ -142,8 +142,10 @@
         formattingMethod ifTrue:[
             | interval |
             interval := rule result selectionIntervalFor: string.
-            text emphasisFrom: interval first to: interval last 
-                     add: emphasis.            
+            interval notNil ifTrue:[
+                text emphasisFrom: interval first to: interval last 
+                         add: emphasis.            
+            ]
         ].
     ] ifFalse:[
         | searches |
@@ -172,9 +174,9 @@
 !LintHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.1 2011-08-05 11:13:08 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.2 2011-08-05 13:06:38 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.1 2011-08-05 11:13:08 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintHighlighter.st,v 1.2 2011-08-05 13:06:38 vrany Exp $'
 ! !