AbstractSettingsApplication.st
changeset 9657 32a86c300786
parent 9656 39d104b5dcaf
child 9738 7dd722970a40
--- a/AbstractSettingsApplication.st	Thu Dec 02 12:26:48 2010 +0100
+++ b/AbstractSettingsApplication.st	Fri Dec 03 09:45:43 2010 +0100
@@ -9424,6 +9424,10 @@
 
     printerTypeSelection isNil ifTrue:[
         printerTypeSelection := (self possiblePrinters identityIndexOf:Printer) asValue.
+        printerTypeSelection value == 0 ifTrue:[
+            printerTypeSelection := (self possiblePrinters firstIfEmpty:[self error:'no printer']) asValue.
+        ].
+
         printerTypeSelection addDependent:self.
         printerTypeSelection changed.
         printerTypeSelection onChangeSend:#updateModifiedChannel to:self
@@ -16726,9 +16730,9 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.377 2010-12-02 11:26:48 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.378 2010-12-03 08:45:43 sr Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.377 2010-12-02 11:26:48 sr Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.378 2010-12-03 08:45:43 sr Exp $'
+! !