--- a/PipeStream.st	Fri Jan 24 23:44:49 1997 +0100
+++ b/PipeStream.st	Sat Jan 25 00:19:50 1997 +0100
@@ -134,7 +134,7 @@
 %}
 ! !
 
-!PipeStream  class methodsFor:'documentation'!
+!PipeStream class methodsFor:'documentation'!
 
 copyright
 "
@@ -191,7 +191,7 @@
 "
 ! !
 
-!PipeStream  class methodsFor:'initialization'!
+!PipeStream class methodsFor:'initialization'!
 
 initialize
     "setup the signal"
@@ -203,7 +203,7 @@
     ]
 ! !
 
-!PipeStream  class methodsFor:'instance creation'!
+!PipeStream class methodsFor:'instance creation'!
 
 readingFrom:commandString
     "create and return a new pipeStream which can read from the unix command
@@ -232,7 +232,7 @@
     "PipeStream writingTo:'sort'"
 ! !
 
-!PipeStream  class methodsFor:'Signal constants'!
+!PipeStream class methodsFor:'Signal constants'!
 
 brokenPipeSignal
     "return the signal used to handle SIGPIPE unix-signals"
@@ -352,7 +352,7 @@
     ].
     lastErrorNumber := nil.
     exitStatus := nil.
-    exitSema := Semaphore new.
+    exitSema := Semaphore new name:'pipe exitSema'.
 
     pipeFdArray := OperatingSystem makePipe.
     pipeFdArray isNil ifTrue:[
@@ -398,11 +398,11 @@
     lastErrorNumber isNil ifTrue:[
         commandString := aCommandString.
 %{
-	/* LINUX stdio is corrupt here ... */
+        /* LINUX stdio is corrupt here ... */
 #ifdef BUGGY_STDIO_LIB
-	__INST(buffered) = false;
+        __INST(buffered) = false;
 #else
-	__INST(buffered) = true;
+        __INST(buffered) = true;
 #endif
 %}.
         hitEOF := false.
@@ -436,9 +436,9 @@
     ^ self openPipeFor:command withMode:'w'
 ! !
 
-!PipeStream  class methodsFor:'documentation'!
+!PipeStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.49 1997-01-10 13:19:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.50 1997-01-24 23:18:40 cg Exp $'
 ! !
 PipeStream initialize!