--- a/extensions.st	Sun Mar 14 12:07:23 2010 +0100
+++ b/extensions.st	Fri Mar 19 12:48:52 2010 +0100
@@ -76,8 +76,8 @@
      (read Knuth or search the web if you dont know what a soundex code is).
 
      Caveat: 'similar sounding words' means: 'similar sounding in ENGLISH'
-             Please have a look at the other phonetic comparison operators found
-             in PhoneticStringUtilities."
+	     Please have a look at the other phonetic comparison operators found
+	     in PhoneticStringUtilities."
 
     ^ PhoneticStringUtilities soundexCodeOf:self
 
@@ -344,7 +344,7 @@
     ('feg' includes:char) ifTrue:[
 	arg := nextArg value asFloat.
 	precision := precision min:6.
-	argString := WriteStream on:VariableString "String" new.
+	argString := WriteStream on:String new.
 	char == $g ifTrue:[
 	    arg absPrintOn:argString digits:precision + 1
 	].
@@ -557,7 +557,7 @@
 	]
     ].
     char == $[ "What a mess!!" ifTrue:[
-	return := WriteStream on:(VariableString "String" new:8).
+	return := WriteStream on:(String new:8).
 	scanset := IdentitySet new.
 	format next.
 	width = 0 ifTrue:[
@@ -1163,5 +1163,5 @@
 !stx_libbasic2 class methodsFor:'documentation'!
 
 extensionsVersion_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/extensions.st,v 1.17 2009-12-05 11:16:53 cg Exp $'
-! !
\ No newline at end of file
+    ^ '$Header: /cvs/stx/stx/libbasic2/extensions.st,v 1.18 2010-03-19 11:48:52 cg Exp $'
+! !