--- a/FourByteString.st	Mon Jul 20 13:20:28 2015 +0200
+++ b/FourByteString.st	Mon Jul 20 13:36:20 2015 +0200
@@ -115,7 +115,7 @@
 utf8Encoded
     "Return my UTF-8 representation as a new String"
 
-    ^ self basicUtf8Encoded.
+    ^ CharacterEncoderImplementations::ISO10646_to_UTF8 new encodeString:self
 !
 
 utf8EncodedOn:aStream
@@ -140,7 +140,7 @@
 !FourByteString class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/FourByteString.st,v 1.4 2015-03-14 21:29:24 stefan Exp $'
+    ^ '$Header$'
 ! !