--- a/DeviceWorkstation.st	Thu Feb 08 17:50:15 2018 +0100
+++ b/DeviceWorkstation.st	Sun Feb 11 20:13:28 2018 +0100
@@ -5099,8 +5099,8 @@
             ex defaultAction.
         ] ifFalse:[
             (self == self class default and:[AllScreens size == 1]) ifTrue:[
-                'DeviceWorkstation [error]: I/O error for default display - writing crash.img and exiting' errorPrintCR.
-                SnapshotError ignoreIn:[ ObjectMemory writeCrashImage ].
+                'DeviceWorkstation [error]: I/O error for default display - writing crash.img and exiting' _errorPrintCR.
+                SnapshotError catch:[ ObjectMemory writeCrashImage ].
                 Smalltalk exit:1.
             ].
             'DeviceWorkstation [warning]: stop dispatch due to I/O error: ' errorPrint.
@@ -5121,6 +5121,7 @@
     ].
 
     "Modified: / 29-09-2006 / 12:28:04 / cg"
+    "Modified: / 09-02-2018 / 20:45:10 / stefan"
 !
 
 startDispatch