--- a/Parser.st	Tue Feb 18 03:19:06 2014 +0100
+++ b/Parser.st	Tue Feb 18 18:07:04 2014 +0100
@@ -4408,7 +4408,7 @@
             ].
 
             UserInformation isHandled ifTrue:[
-                UserInformation raiseErrorString:msg
+                UserInformation raiseRequestErrorString:msg
             ] ifFalse:[
                 Transcript showCR:msg.
             ]
@@ -11784,11 +11784,11 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.801 2014-02-14 10:03:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.802 2014-02-18 17:07:04 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.801 2014-02-14 10:03:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.802 2014-02-18 17:07:04 stefan Exp $'
 !
 
 version_SVN