--- a/PipeStr.st Mon Nov 20 15:34:42 1995 +0100
+++ b/PipeStr.st Mon Nov 20 15:51:54 1995 +0100
@@ -34,7 +34,7 @@
!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.38 1995-11-11 15:25:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/PipeStr.st,v 1.39 1995-11-20 14:51:54 cg Exp $'
!
documentation
@@ -188,7 +188,7 @@
"setup the signal"
BrokenPipeSignal isNil ifTrue:[
- BrokenPipeSignal := ErrorSignal newSignalMayProceed:true.
+ BrokenPipeSignal := WriteErrorSignal newSignalMayProceed:true.
BrokenPipeSignal nameClass:self message:#brokenPipeSignal.
BrokenPipeSignal notifierString:'write on a pipe with no one to read'.
]
--- a/PipeStream.st Mon Nov 20 15:34:42 1995 +0100
+++ b/PipeStream.st Mon Nov 20 15:51:54 1995 +0100
@@ -34,7 +34,7 @@
!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.38 1995-11-11 15:25:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PipeStream.st,v 1.39 1995-11-20 14:51:54 cg Exp $'
!
documentation
@@ -188,7 +188,7 @@
"setup the signal"
BrokenPipeSignal isNil ifTrue:[
- BrokenPipeSignal := ErrorSignal newSignalMayProceed:true.
+ BrokenPipeSignal := WriteErrorSignal newSignalMayProceed:true.
BrokenPipeSignal nameClass:self message:#brokenPipeSignal.
BrokenPipeSignal notifierString:'write on a pipe with no one to read'.
]