--- a/PositionableStream.st	Sat Jul 12 19:28:03 2003 +0200
+++ b/PositionableStream.st	Mon Jul 14 12:20:29 2003 +0200
@@ -1114,6 +1114,12 @@
 
 !PositionableStream methodsFor:'queries'!
 
+contentsClass
+    "answer the class, we stream on (a collection class)"
+
+    ^ collection class
+!
+
 isPositionable
     "return true, if the stream supports positioning (this one is)"
 
@@ -1192,7 +1198,7 @@
 !PositionableStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.129 2003-06-16 10:02:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.130 2003-07-14 10:20:29 stefan Exp $'
 ! !
 
 PositionableStream initialize!