--- a/host.rc	Thu Mar 14 02:12:49 2013 +0100
+++ b/host.rc	Wed Mar 20 20:43:29 2013 +0100
@@ -13,7 +13,7 @@
  * looks for a host specific h_hostName.rc init file and loads it.
  *"
 !
-|sysType host domain s rshCommand isStupidSYSV3 conf includes incDir|
+|sysType host domain s rshCommand isStupidSYSV3 conf includes incDir ps|
 
 sysType := OperatingSystem getSystemType.
 isStupidSYSV3 := false.
@@ -38,99 +38,10 @@
 host := OperatingSystem getHostName.
 (Smalltalk at:#'_ImageHostName') ~= host ifTrue:[
     sysType = 'win32' ifTrue:[
-	PrinterStream notNil ifTrue:[
-	    Printer := WinPrinterStream.
-	]
+	Printer := Smalltalk at:#WinPrinterStream.
     ] ifFalse:[
-	"/
-	"/ setup the printer stuff.
-	"/ the commands below will be offered in the printer-setting box
-	"/
-	PostscriptPrinterStream notNil ifTrue:[
-	    isStupidSYSV3 ifTrue:[
-		PostscriptPrinterStream
-		    defaultCommands:#(
-					'lpr'
-					'cat | remsh {hostname} lpr -h'
-					'cat > preview.ps'
-					'cat > preview.ps; gv preview.ps'
-				     ).
-	    ] ifFalse:[
-		PostscriptPrinterStream
-		    defaultCommands:#(
-					'lpr -h'
-					'cat | rsh {hostname} lpr -h'
-					'cat > preview.ps'
-					'cat > preview.ps; gv preview.ps'
-				     ).
-	    ].
-	    PostscriptPrinterStream printCommand:'lpr'.
-	].
-
-	PrinterStream notNil ifTrue:[
-	    isStupidSYSV3 ifTrue:[
-		PrinterStream
-		    defaultCommands:#(
-					'lpr -h'
-					'cat | remsh {hostname} lpr -h'
-					'a2ps | remsh {hostname} lpr -h'
-					'a2ps > preview.ps; gv preview.ps'
-				     ).
-	    ] ifFalse:[
-		PrinterStream
-		    defaultCommands:#(
-					'lpr -h'
-					'cat | rsh {hostname} lpr -h'
-					'a2ps | rsh {hostname} lpr -h'
-					'a2ps > preview.ps; gv preview.ps'
-				     ).
-	    ].
-	    Printer := PrinterStream.
-	    PrinterStream printCommand:'lpr'.
-	].
-	"/ Printer := PostscriptPrinterStream.
+	Printer := Smalltalk at:#PostscriptPrinterStream.
     ].
-
-false ifTrue:[
-    "/ in our home-domain, preset the print command for remote printing
-    "/ on a host called 'ibm'.
-    "/ You can change this for YOUR environment and/or make it unconditional.
-    "/ Consider the stuff below as an example; you should add
-    "/ corresponding setup into a private h_xxxx.rc file.
-
-    domain := OperatingSystem getDomainName.
-    (domain = 'exept.de') ifTrue:[
-	PostscriptPrinterStream notNil ifTrue:[
-	    isStupidSYSV3 ifTrue:[
-		PostscriptPrinterStream printCommand:'cat | remsh exept lpr -h'.
-		PrinterStream printCommand:'cat | remsh exept lpr -h'.
-		PostscriptPrinterStream defaultCommands:#(
-					    'cat | remsh exept lpr -h'
-					    'cat > preview.ps'
-					    'cat > preview.ps; gv preview.ps'
-				     ).
-		PrinterStream defaultCommands:#(
-					    'cat | remsh exept lpr -h'
-					    'a2ps | remsh exept lpr -h'
-					    'a2ps > preview.ps; gv preview.ps'
-				     ).
-	    ] ifFalse:[
-		PostscriptPrinterStream printCommand:'cat | rsh exept lpr -h'.
-		PrinterStream printCommand:'cat | rsh exept lpr -h'.
-		PostscriptPrinterStream defaultCommands:#(
-					    'cat | rsh exept lpr -h'
-					    'cat > preview.ps'
-					    'cat > preview.ps; gv preview.ps'
-				     ).
-		PrinterStream defaultCommands:#(
-					    'cat | rsh exept lpr -h'
-					    'a2ps | rsh exept lpr -h'
-					    'a2ps > preview.ps; gv preview.ps'
-				     ).
-	    ].
-	].
-    ].
-].
 ].
 
 "------------------------------------------------------------------------"