--- a/host.rc Fri Nov 08 19:46:34 1996 +0100
+++ b/host.rc Sat Nov 09 02:03:57 1996 +0100
@@ -25,24 +25,30 @@
"/ setup the printer stuff.
"/ the commands below will be offered in the printer-setting box
"/
-PostscriptPrinterStream defaultCommands:#(
- 'lpr -h'
- 'cat | rsh <hostname> lpr -h'
- 'cat > preview.ps'
- 'cat > preview.ps; ghostview preview.ps'
- ).
+PostscriptPrinterStream notNil ifTrue:[
+ PostscriptPrinterStream
+ defaultCommands:#(
+ 'lpr -h'
+ 'cat | rsh <hostname> lpr -h'
+ 'cat > preview.ps'
+ 'cat > preview.ps; ghostview preview.ps'
+ ).
+ PostscriptPrinterStream printCommand:'lpr'.
+].
-PrinterStream defaultCommands:#(
- 'lpr -h'
- 'cat | rsh <hostname> lpr -h'
- 'a2ps | rsh <hostname> lpr -h'
- 'a2ps > preview.ps; ghostview preview.ps'
- ).
+PrinterStream notNil ifTrue:[
+ PrinterStream
+ defaultCommands:#(
+ 'lpr -h'
+ 'cat | rsh <hostname> lpr -h'
+ 'a2ps | rsh <hostname> lpr -h'
+ 'a2ps > preview.ps; ghostview preview.ps'
+ ).
+ Printer := PrinterStream.
+ PrinterStream printCommand:'lpr'.
+].
-Printer := PrinterStream.
"/ Printer := PostscriptPrinterStream.
-PostscriptPrinterStream printCommand:'lpr'.
-PrinterStream printCommand:'lpr'.
"/ in our home-domain, preset the print command for remote printing
"/ on a host called 'ibm'.