--- a/TextStream.st	Sat Jan 22 20:44:35 2000 +0100
+++ b/TextStream.st	Sat Jan 22 20:45:01 2000 +0100
@@ -168,6 +168,13 @@
     "
 
     "Modified: / 20.6.1998 / 17:11:30 / cg"
+!
+
+stringContents
+    "return the streams collected string contents"
+
+    ^ super contents
+
 ! !
 
 !TextStream methodsFor:'private'!
@@ -185,5 +192,5 @@
 !TextStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/TextStream.st,v 1.4 1998-06-20 15:12:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/TextStream.st,v 1.5 2000-01-22 19:45:01 cg Exp $'
 ! !