--- a/FileStream.st Thu Feb 22 16:23:17 2007 +0100
+++ b/FileStream.st Thu Feb 22 16:23:40 2007 +0100
@@ -1198,7 +1198,7 @@
#endif /* poor VMS */
if (@global(FileOpenTrace) == true) {
- fprintf(stderr, "fopen %s [FileStream] -> %x\n", __stringVal(pathName), f);
+ console_fprintf(stderr, "fopen %s [FileStream] -> %x\n", __stringVal(pathName), f);
}
if (f != NULL) {
OBJ fp;
@@ -1504,7 +1504,7 @@
!FileStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.126 2007-02-20 08:14:27 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.127 2007-02-22 15:23:40 cg Exp $'
! !
FileStream initialize!