--- a/Text.st	Tue Sep 21 08:58:34 2010 +0200
+++ b/Text.st	Tue Sep 21 08:58:38 2010 +0200
@@ -11,7 +11,7 @@
 "
 "{ Package: 'stx:libbasic2' }"
 
-CharacterArray variableByteSubclass:#Text
+CharacterArray subclass:#Text
 	instanceVariableNames:'string runs'
 	classVariableNames:'BackgroundColorEmphasis ColorEmphasis ItalicEmphasis BoldEmphasis
 		UnderlineEmphasis UnderwaveEmphasis OverlineEmphasis
@@ -1407,10 +1407,6 @@
     "Modified: 16.5.1996 / 11:23:32 / cg"
 !
 
-displayString
-    ^ String streamContents:[:s| self displayOn:s]
-!
-
 printOn:aStream
     "print the receivers characters (including emphasis) on
      aStream. 
@@ -1747,11 +1743,11 @@
 !Text class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.106 2009-10-29 17:23:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.107 2010-09-21 06:58:38 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.106 2009-10-29 17:23:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.107 2010-09-21 06:58:38 stefan Exp $'
 ! !
 
 Text initialize!