--- a/AbstractOperatingSystem.st	Mon Jul 14 12:51:53 2003 +0200
+++ b/AbstractOperatingSystem.st	Mon Jul 14 20:18:36 2003 +0200
@@ -779,6 +779,9 @@
         pIn := NonPositionableExternalStream makePipe.
         inStreamToClose := externalInStream := pIn at:1.
         shuffledInStream := pIn at:2.
+        anInStream isBinary ifTrue:[
+            shuffledInStream binary
+        ].
         lineWise ifFalse:[
             shuffledInStream blocking:false.
         ].
@@ -801,6 +804,9 @@
      and:[externalOutStream isExternalStream not]) ifTrue:[
         pOut := NonPositionableExternalStream makePipe.
         shuffledOutStream := (pOut at:1).
+        anOutStream isBinary ifTrue:[
+            shuffledOutStream binary
+        ].
         outStreamToClose := externalOutStream := pOut at:2.
         outputShufflerProcess := 
             [
@@ -814,6 +820,9 @@
             anErrStream isExternalStream ifFalse:[
                 pErr := NonPositionableExternalStream makePipe.
                 shuffledErrStream := (pErr at:1).
+                anErrStream isBinary ifTrue:[
+                    shuffledErrStream binary
+                ].
                 errStreamToClose := externalErrStream := pErr at:2.
                 errorShufflerProcess := 
                     [
@@ -828,6 +837,9 @@
         auxStreamToClose := externalAuxStream := pAux at:1.
         shuffledAuxStream := pAux at:2.
         shuffledAuxStream blocking:false.
+        anAuxStream isBinary ifTrue:[
+            shuffledAuxStream binary
+        ].
 
         "/ start a reader process, shuffling data from the given
         "/ auxStream to the pipe (which is connected to the commands aux)
@@ -4502,7 +4514,7 @@
 !AbstractOperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.100 2003-07-12 15:09:28 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.101 2003-07-14 18:18:36 stefan Exp $'
 ! !
 
 AbstractOperatingSystem initialize!