mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-23 03:20:57 +00:00
12 lines
178 B
Smalltalk
12 lines
178 B
Smalltalk
|
"List all available printers"
|
||
|
|
|
||
|
|
| printers |
|
||
|
|
|
||
|
|
Environment loadModule:'AppKit'.
|
||
|
|
|
||
|
|
printers := NSPrinter printerTypes.
|
||
|
|
printers do:
|
||
|
|
[ :printer |
|
||
|
|
Transcript showLine: printer.
|
||
|
|
]
|