1 to: numberPrinters do: [:indx |
(CgPrinterScreenInfo
driverName: 'winspool' "$NON-NLS$"
deviceName: (printerNames at: indx)
outputMedium: (printerPortNames at: indx))
ifNil: [^Dictionary new]
ifNotNil: [:printerScreenInfo |
updatedPrinters
at: (
printerScreenInfo deviceName , ',winspool,' ,
printerScreenInfo outputMedium) "$NON-NLS$"
put: printerScreenInfo]].
1 to: numberPrinters do: [:indx |
(CgPrinterScreenInfo
driverName: 'winspool' "$NON-NLS$"
deviceName: (printerNames at: indx ifAbsent: [nil])
outputMedium: (printerPortNames at: indx ifAbsent: [nil]))
ifNil: [
"If this happens, it is not necessarily catastrophic, a printer port might be defined, but the printer is not, so just skip it instead of failing and saying we have no printers."
]
ifNotNil: [:printerScreenInfo |
updatedPrinters
at: (
printerScreenInfo deviceName , ',winspool,' ,
printerScreenInfo outputMedium) "$NON-NLS$"
put: printerScreenInfo]].
--
You received this message because you are subscribed to the Google Groups "VAST Community Forum" group.
To unsubscribe from this group and stop receiving emails from it, send an email to va-smalltalk...@googlegroups.com.
To view this discussion visit https://groups.google.com/d/msgid/va-smalltalk/7e53eb37-3023-4049-a15b-64b007ddc901n%40googlegroups.com.
| |||||||||||||||||
|