--- a/String.st	Sun Jul 14 19:27:31 2013 +0100
+++ b/String.st	Tue Jul 16 14:00:13 2013 +0100
@@ -496,6 +496,7 @@
 
 
 
+
 !String class methodsFor:'queries'!
 
 defaultPlatformClass
@@ -516,6 +517,7 @@
 ! !
 
 
+
 !String methodsFor:'Compatibility-VW5.4'!
 
 asGUID
@@ -3382,7 +3384,7 @@
 !
 
 stringSpecies
-    ^ String
+    ^ self species
 ! !
 
 !String methodsFor:'sorting & reordering'!
@@ -3415,6 +3417,7 @@
     ^ super reverse
 ! !
 
+
 !String methodsFor:'substring searching'!
 
 indexOfSubCollection:aSubString startingAt:startIndex ifAbsent:exceptionValue caseSensitive:caseSensitive
@@ -3892,13 +3895,14 @@
 
 ! !
 
+
 !String class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.306 2013-06-27 21:01:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.307 2013-07-15 10:33:30 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.306 2013-06-27 21:01:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.307 2013-07-15 10:33:30 stefan Exp $'
 ! !