--- a/NonPositionableExternalStream.st	Mon Oct 29 15:53:25 2018 +0100
+++ b/NonPositionableExternalStream.st	Mon Oct 29 16:55:28 2018 +0100
@@ -145,8 +145,8 @@
             raise.
     ].
 
-    rs := NonPositionableExternalStream forFileDescriptor:(pipe at:1) mode:#readWrite buffered:false handleType:#pipeFilePointer.
-    ws := NonPositionableExternalStream forFileDescriptor:(pipe at:2) mode:#readWrite buffered:false handleType:#pipeFilePointer.
+    rs := PipeStream forFileDescriptor:(pipe at:1) mode:#readWrite buffered:false handleType:#pipeFilePointer.
+    ws := PipeStream forFileDescriptor:(pipe at:2) mode:#readWrite buffered:false handleType:#pipeFilePointer.
     ^ Array with:rs with:ws
 
     "
@@ -172,6 +172,8 @@
          ws close.
      ] fork.
     "
+
+    "Modified: / 29-10-2018 / 15:08:50 / Claus Gittinger"
 !
 
 makePTYPair
@@ -231,8 +233,8 @@
             raise.
     ].
 
-    rs := NonPositionableExternalStream forFileDescriptor:(pipeArray at:1) mode:#readonly buffered:false handleType:#pipeFilePointer.
-    ws := NonPositionableExternalStream forFileDescriptor:(pipeArray at:2) mode:#writeonly buffered:false handleType:#pipeFilePointer.
+    rs := PipeStream forFileDescriptor:(pipeArray at:1) mode:#readonly buffered:false handleType:#pipeFilePointer.
+    ws := PipeStream forFileDescriptor:(pipeArray at:2) mode:#writeonly buffered:false handleType:#pipeFilePointer.
     ^ Array with:rs with:ws
 
     "
@@ -259,7 +261,8 @@
      ] fork.
     "
 
-    "Modified: 29.2.1996 / 18:28:36 / cg"
+    "Modified: / 29-02-1996 / 18:28:36 / cg"
+    "Modified: / 29-10-2018 / 15:09:22 / Claus Gittinger"
 ! !
 
 !NonPositionableExternalStream methodsFor:'accessing'!