--- a/ExternalStream.st	Thu Aug 12 15:51:06 2004 +0200
+++ b/ExternalStream.st	Thu Aug 12 17:48:55 2004 +0200
@@ -4125,7 +4125,7 @@
     lastErrorNumber := aNumber
 ! !
 
-!ExternalStream methodsFor:'private instance release'!
+!ExternalStream privateMethodsFor:'private instance release'!
 
 closeFile
     "low level close - may be redefined in subclasses
@@ -4161,7 +4161,9 @@
         filePointer := nil.
         self closeFile:fp
     ]
-!
+! !
+
+!ExternalStream methodsFor:'private instance release'!
 
 closeFile:filePointer
     "for rel5 only"
@@ -5888,7 +5890,7 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.282 2004-08-12 13:51:06 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.283 2004-08-12 15:48:53 stefan Exp $'
 ! !
 
 ExternalStream initialize!