--- a/PositionableStream.st Mon Nov 10 15:55:20 2003 +0100
+++ b/PositionableStream.st Tue Nov 11 09:39:01 2003 +0100
@@ -579,7 +579,7 @@
"/ otherwise ask what should be done now and either
"/ continue or abort the fileIn
-Transcript showCR:Screen current.
+
redef ifTrue:[
action := OptionBox
request:(msg withCRs)
@@ -1214,7 +1214,7 @@
!PositionableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.136 2003-10-28 19:56:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.137 2003-11-11 08:39:01 cg Exp $'
! !
PositionableStream initialize!