equal
deleted
inserted
replaced
35 "/ only reset the printer setting, if restarted |
35 "/ only reset the printer setting, if restarted |
36 "/ on another host. |
36 "/ on another host. |
37 |
37 |
38 host := OperatingSystem getHostName. |
38 host := OperatingSystem getHostName. |
39 (Smalltalk at:#'_ImageHostName') ~= host ifTrue:[ |
39 (Smalltalk at:#'_ImageHostName') ~= host ifTrue:[ |
40 sysType ~= 'win32' ifTrue:[ |
40 sysType = 'win32' ifTrue:[ |
|
41 PrinterStream notNil ifTrue:[ |
|
42 Printer := WinPrinterStream. |
|
43 ] |
|
44 ] ifFalse:[ |
41 "/ |
45 "/ |
42 "/ setup the printer stuff. |
46 "/ setup the printer stuff. |
43 "/ the commands below will be offered in the printer-setting box |
47 "/ the commands below will be offered in the printer-setting box |
44 "/ |
48 "/ |
45 PostscriptPrinterStream notNil ifTrue:[ |
49 PostscriptPrinterStream notNil ifTrue:[ |