SyntaxHighlighter.st
changeset 1110 3e08a12956fd
parent 990 cd1aa00086fd
child 1132 b5958fa3816e
--- a/SyntaxHighlighter.st	Wed Nov 08 13:37:31 2000 +0100
+++ b/SyntaxHighlighter.st	Wed Nov 08 13:37:36 2000 +0100
@@ -12,6 +12,8 @@
 
 
 
+"{ Package: 'stx:libcomp' }"
+
 Parser subclass:#SyntaxHighlighter
 	instanceVariableNames:'sourceText identifierColor identifierEmphasis
 		argumentIdentifierColor argumentIdentifierEmphasis
@@ -125,7 +127,7 @@
 
     aString isNil ifTrue:[^ nil].
 
-    Object errorSignal handle:[:ex |
+    Error handle:[:ex |
         ^ aString
     ] do:[
         parser := self for:(ReadStream on:aString string) in:aClass.
@@ -643,5 +645,5 @@
 !SyntaxHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.30 1999-11-09 09:33:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.31 2000-11-08 12:37:36 cg Exp $'
 ! !