--- a/Tools__LintHighlighter.st	Sun Jan 29 02:23:23 2017 +0100
+++ b/Tools__LintHighlighter.st	Mon Jan 30 15:12:22 2017 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2006 by eXept Software AG
               All Rights Reserved
@@ -228,7 +230,7 @@
                 resultSelectionIntervalsForSource: string tree: tree in: class 
                 do: [:interval|
                     interval notEmptyOrNil ifTrue:[
-                        (interval first == 1 and:[interval last == text size]) ifTrue:[
+                        ((interval first == 1 and:[interval last == text size]) or:[interval last > text size]) ifTrue:[
                             self debuggingCodeFor:#jv is:[
                                  Transcript showCR:'>> no meaningful selection interval for ' , rule printString.
                             ].
@@ -261,6 +263,7 @@
     "Created: / 02-12-2014 / 11:28:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (format): / 15-12-2014 / 18:58:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (format): / 19-11-2016 / 13:35:25 / cg"
+    "Modified: / 30-01-2017 / 14:51:18 / stefan"
 ! !
 
 !LintHighlighter methodsFor:'initialization'!