fix if printer is gone
authorsr
Thu, 02 Dec 2010 12:26:48 +0100
changeset 9656 39d104b5dcaf
parent 9655 19541d63506a
child 9657 32a86c300786
fix if printer is gone
AbstractSettingsApplication.st
--- a/AbstractSettingsApplication.st	Thu Dec 02 10:45:11 2010 +0100
+++ b/AbstractSettingsApplication.st	Thu Dec 02 12:26:48 2010 +0100
@@ -9379,7 +9379,17 @@
 printerIsDrivenByCommand
     printerIsDrivenByCommand isNil ifTrue:[
         printerIsDrivenByCommand := BlockValue
-            with:[:m | (self possiblePrinters at:m value ifAbsent:[self breakPoint:#expecco. ^ false]) isDrivenByCommand] 
+            with:[:m | 
+                |printer|
+
+                printer := self possiblePrinters at:m value ifAbsent:nil.
+                printer notNil ifTrue:[
+                    printer isDrivenByCommand
+                ] ifFalse:[
+                    self breakPoint:#expecco. 
+                    false
+                ]
+            ] 
             argument:self printerTypeSelection.
     ].
     ^ printerIsDrivenByCommand.
@@ -16716,9 +16726,9 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.376 2010-12-02 09:45:11 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.377 2010-12-02 11:26:48 sr Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.376 2010-12-02 09:45:11 sr Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.377 2010-12-02 11:26:48 sr Exp $'
+! !