--- a/ExtStream.st	Sat Sep 16 19:14:32 1995 +0200
+++ b/ExtStream.st	Sun Sep 17 19:57:55 1995 +0200
@@ -24,7 +24,7 @@
 COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.52 1995-09-16 17:13:10 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.53 1995-09-17 17:56:12 claus Exp $
 '!
 
 !ExternalStream primitiveDefinitions!
@@ -91,7 +91,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.52 1995-09-16 17:13:10 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/ExtStream.st,v 1.53 1995-09-17 17:56:12 claus Exp $
 "
 !
 
@@ -535,6 +535,13 @@
 
 !ExternalStream methodsFor:'queries'!
 
+isExternalStream
+    "return true, if the receiver is some kind of externalStream;
+     true is returned here - the method redefined from Object."
+
+    ^ true
+!
+
 isReadable 
     "return true, if this stream can be read from"
 
@@ -2997,7 +3004,7 @@
 	if (_INST(binary) != true) {
 	    f = MKFD(fp);
             
-            if (feof(f)) {
+	    if (feof(f)) {
 		_INST(hitEOF) = true;
 		RETURN ( nil );
 	    }