--- a/EvalScriptingErrorHandler.st	Sat Aug 08 22:49:53 2020 +0100
+++ b/EvalScriptingErrorHandler.st	Tue Aug 25 12:20:06 2020 +0100
@@ -63,12 +63,17 @@
 
     Stderr nextPutLine:('[%1 %2/%3] %4' bindWith:errorOrWarning with:lineNr with:pos with:aMessage).
     currentSource notNil ifTrue:[
-        Stderr 
-            nextPutLine:currentSource;
-            spaces:position?0;
-            nextPutLine:'^'.
+        Error handle:[:ex |
+        ] do:[
+            Stderr 
+                nextPutLine:currentSource;
+                spaces:position?0;
+                nextPutLine:'^'.
+        ].
     ].
     ^ #Error
+
+    "Modified: / 24-09-2018 / 14:18:02 / Claus Gittinger"
 !
 
 warning:aMessage position:position to:endPos from:aCompiler
@@ -90,10 +95,10 @@
 !EvalScriptingErrorHandler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.9 2015-05-22 18:37:50 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.9 2015-05-22 18:37:50 cg Exp $'
+    ^ '$Header$'
 ! !