--- a/Smalltalk.st	Sat Dec 22 18:03:01 2018 +0100
+++ b/Smalltalk.st	Tue Dec 25 10:22:19 2018 +0100
@@ -7158,17 +7158,23 @@
      Return true if ok, false if failed"
 
     Parser isNil ifTrue:[
-	^ false         "/ for small stand alone apps.
+        ^ false         "/ for small stand alone apps.
     ].
 
     ^ (SignalSet
-	with:AbortOperationRequest
-	with:TerminateProcessRequest
-	with:ParseError)
-	    handle:[:ex | ex return:false ]
-	    do:[ self fileIn:aFileName ].
+        with:AbortOperationRequest
+        with:TerminateProcessRequest
+        with:ParseError)
+            handle:[:ex | 
+                ex creator == ParseError ifTrue:[
+                    Logger info:'ParseError in line %1: %2' with:ex lineNumber with:ex description.
+                ].
+                ex return:false 
+            ]
+            do:[ self fileIn:aFileName ].
 
     "Modified: / 23-04-2018 / 16:53:29 / stefan"
+    "Modified: / 25-12-2018 / 10:23:40 / Claus Gittinger"
 !
 
 silentFileIn:aFilename