--- a/PipeStream.st	Mon Feb 07 14:48:22 2000 +0100
+++ b/PipeStream.st	Mon Feb 07 19:17:31 2000 +0100
@@ -382,6 +382,14 @@
     "Created: 28.12.1995 / 14:54:30 / stefan"
 ! !
 
+!PipeStream methodsFor:'finalization'!
+
+disposed
+    "redefined to avoid blocking in close."
+
+    self shutDown
+! !
+
 !PipeStream methodsFor:'instance release'!
 
 closeFile
@@ -451,12 +459,6 @@
     ]
 !
 
-disposed
-    "redefined to avoid blocking in close."
-
-    self shutDown
-!
-
 shutDown
     "close the Stream, ignoring any broken-pipe errors.
      Terminate the command"
@@ -700,6 +702,6 @@
 !PipeStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.82 2000-01-24 16:15:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.83 2000-02-07 18:17:31 cg Exp $'
 ! !
 PipeStream initialize!