--- a/StandaloneStartup.st	Thu Jan 23 13:58:34 2014 +0100
+++ b/StandaloneStartup.st	Thu Jan 23 15:01:49 2014 +0100
@@ -834,7 +834,14 @@
 
 loadPatch:fileName
     self verboseInfo:('loading patch: ',fileName baseName).
-    Smalltalk silentFileIn:fileName pathName.
+    [
+        Smalltalk silentFileIn:fileName pathName.
+    ] on:InvalidPatchError do:[:ex|
+        self verboseInfo:('invalid patch: %1 error: %2'
+                                 bindWith:fileName baseName with:ex messageText).
+        ^ false.
+    ].
+    ^ true
 !
 
 loadPatches
@@ -1190,11 +1197,11 @@
 !StandaloneStartup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.81 2014-01-14 15:32:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.82 2014-01-23 14:01:49 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.81 2014-01-14 15:32:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.82 2014-01-23 14:01:49 stefan Exp $'
 ! !