--- a/SyntaxHighlighter.st Tue Aug 22 14:42:47 2006 +0200
+++ b/SyntaxHighlighter.st Tue Aug 22 14:43:17 2006 +0200
@@ -139,13 +139,16 @@
aString isNil ifTrue:[^ nil].
Error handle:[:ex |
+ ex signal isHandled ifTrue:[
+ ex reject.
+ ].
('SyntaxHighlighter [info]: error during highlight: ' , ex description) infoPrintCR.
"/ ex suspendedContext fullPrintAll.
^ aString
] do:[
highlighter := self for:(ReadStream on:aString string) in:aClass.
preferencesOrNil notNil ifTrue:[highlighter preferences:preferencesOrNil].
- highlighter ignoreErrors:true.
+ "/ highlighter ignoreErrors:true.
highlighter ignoreWarnings:true.
highlighter sourceText:(text := aString string asText).
"/ use an array here - this can be changed much faster using #at:put:
@@ -187,7 +190,7 @@
in:UndefinedObject
"
- "Modified: / 23.10.1998 / 22:48:45 / cg"
+ "Modified: / 22-08-2006 / 13:32:04 / cg"
! !
!SyntaxHighlighter methodsFor:'accessing'!
@@ -700,5 +703,5 @@
!SyntaxHighlighter class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.52 2006-08-08 21:38:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.53 2006-08-22 12:43:17 cg Exp $'
! !