--- a/AbstractSyntaxHighlighter.st	Sat Aug 10 13:10:01 2013 +0200
+++ b/AbstractSyntaxHighlighter.st	Sat Aug 10 13:10:59 2013 +0200
@@ -83,7 +83,7 @@
 
         "/ alternative2: take original emphasis for rest
 
-        endPos := parser sourceStream position1Based.
+        endPos := parser sourceStream position + 1.
         endPos >= text size ifTrue:[
             ^ text
         ].
@@ -198,13 +198,13 @@
                 "/ mhmh - which is better ...
                 "/ alternative1: color rest after error in red
                 text 
-                    emphasizeFrom:(highlighter sourceStream position1Based) 
+                    emphasizeFrom:(highlighter sourceStream position + 1) 
                     to:text size 
                     with:(#color->eColor).
             ] ifFalse:[
                 "/ alternative2: take original emphasis for rest
 
-                endPos := highlighter sourceStream position1Based.
+                endPos := highlighter sourceStream position + 1.
                 endPos >= text size ifTrue:[
                     ^ text
                 ].
@@ -573,11 +573,11 @@
 !AbstractSyntaxHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/AbstractSyntaxHighlighter.st,v 1.26 2013-07-27 10:06:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/AbstractSyntaxHighlighter.st,v 1.27 2013-08-10 11:10:59 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/AbstractSyntaxHighlighter.st,v 1.26 2013-07-27 10:06:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/AbstractSyntaxHighlighter.st,v 1.27 2013-08-10 11:10:59 stefan Exp $'
 !
 
 version_SVN