--- a/PositionableStream.st	Fri Mar 22 12:47:11 2013 +0100
+++ b/PositionableStream.st	Fri Mar 22 15:20:05 2013 +0100
@@ -139,6 +139,7 @@
     "
 ! !
 
+
 !PositionableStream methodsFor:'accessing'!
 
 collection
@@ -192,6 +193,10 @@
     readLimit := aNumber
 !
 
+setCollection:newCollection
+    collection := newCollection
+!
+
 writeLimit:aNumber
     "set the writeLimit; thats the position after which writing is prohibited"
 
@@ -660,11 +665,12 @@
 !PositionableStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.154 2011-05-27 14:22:27 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.155 2013-03-22 14:20:05 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.154 2011-05-27 14:22:27 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.155 2013-03-22 14:20:05 cg Exp $'
 ! !
 
+
 PositionableStream initialize!