--- a/Scanner.st	Fri Aug 23 01:20:53 2019 +0200
+++ b/Scanner.st	Fri Aug 23 01:21:43 2019 +0200
@@ -1595,23 +1595,19 @@
         "/ self halt.
     ] ifFalse:[
         "/ Raise an error.
-        "/ For backward compatibility, if error IS NOT handled and requestor
+        "/ For backward compatibility, if requestor
         "/ IS set, then dispatch to requestor.
 
         "/ backward compatibility - will vanish eventually (use a handler, Luke)
-        ("ParseError isHandled not and: ["requestor notNil"]") ifTrue:[
+        requestor notNil ifTrue:[
             requestor error:aMessage position:position to:endPos from:self.
             ^ self
         ].
-        true "ParseError isHandled" ifTrue:[
-            ParseError new
-                errorMessage:aMessage startPosition:position endPosition:endPos;
-                parameter:self;
-                lineNumber:(lineNrOrNil ? tokenLineNr); "lineNr"
-                raiseRequest.
-            ^ self
-        ].
-        self showErrorMessage:aMessage position:position.
+        ParseError new
+            errorMessage:aMessage startPosition:position endPosition:endPos;
+            parameter:self;
+            lineNumber:(lineNrOrNil ? tokenLineNr); "lineNr"
+            raiseRequest.
     ].
 
     "Created: / 08-02-2019 / 11:15:37 / Claus Gittinger"