--- a/PeekableStream.st	Wed Feb 26 12:24:32 1997 +0100
+++ b/PeekableStream.st	Wed Feb 26 12:24:48 1997 +0100
@@ -207,8 +207,7 @@
      'hello world' readStream upToMatching:[:c | c isSeparator].
     "
 
-    "Modified: 4.1.1997 / 23:38:05 / cg"
-    "Created: 26.2.1997 / 12:09:38 / cg"
+    "Modified: 26.2.1997 / 12:20:57 / cg"
 !
 
 upToSeparator
@@ -236,5 +235,5 @@
 !PeekableStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PeekableStream.st,v 1.17 1997-02-26 11:10:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PeekableStream.st,v 1.18 1997-02-26 11:24:48 cg Exp $'
 ! !