--- a/TextCollector.st	Wed Nov 04 14:20:41 2009 +0100
+++ b/TextCollector.st	Thu Nov 05 14:46:11 2009 +0100
@@ -739,6 +739,13 @@
 
     "Created: / 28.7.1998 / 00:31:46 / cg"
     "Modified: / 28.7.1998 / 00:34:58 / cg"
+!
+
+tab
+    "append a tab-character to the stream.
+     This is only allowed, if the receiver supports writing."
+
+    self nextPut:(Character tab)
 ! !
 
 !TextCollector methodsFor:'stream messages-emphasis'!
@@ -849,11 +856,11 @@
 !TextCollector class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.98 2009-10-28 18:26:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.99 2009-11-05 13:46:11 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.98 2009-10-28 18:26:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.99 2009-11-05 13:46:11 stefan Exp $'
 ! !
 
 TextCollector initialize!