--- a/SyntaxHighlighter.st	Thu Oct 22 22:22:46 1998 +0200
+++ b/SyntaxHighlighter.st	Sat Oct 24 13:01:10 1998 +0200
@@ -136,11 +136,12 @@
         tree == #Error ifTrue:[
             "/ mhmh - which is better ...
             "/ alternative1: color rest after error in red
-    "/        text 
-    "/            emphasizeFrom:(parser sourceStream position) 
-    "/            to:text size 
-    "/            with:(#color->Color red).
-
+true ifTrue:[
+            text 
+                emphasizeFrom:(parser sourceStream position) 
+                to:text size 
+                with:(#color->Color red).
+] ifFalse:[
 
             "/ alternative2: take original emphasis for rest
 
@@ -149,7 +150,7 @@
                 ^ text
             ].
             ^ (text copyTo:endPos) , (aString copyFrom:(endPos+1))
-
+].
             "/ alternative3: no emphasis for rest.
 
     "/        ^ text "/ aString
@@ -166,7 +167,7 @@
         in:UndefinedObject
     "
 
-    "Modified: / 16.4.1998 / 23:29:43 / cg"
+    "Modified: / 23.10.1998 / 22:48:45 / cg"
 ! !
 
 !SyntaxHighlighter methodsFor:'accessing'!
@@ -486,5 +487,5 @@
 !SyntaxHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.14 1998-10-19 18:41:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.15 1998-10-24 11:01:10 cg Exp $'
 ! !