--- a/ImmutableString.st	Fri Apr 13 15:03:30 2012 +0100
+++ b/ImmutableString.st	Sat May 05 22:58:24 2012 +0100
@@ -104,22 +104,6 @@
 
 !ImmutableString methodsFor:'copying'!
 
-copyEmpty
-    "when copying, return a real (mutable) String"
-
-    ^ String new:self size
-
-    "Created: / 3.8.1998 / 14:46:22 / cg"
-!
-
-copyEmptyAndGrow:size
-    "when copying, return a real (mutable) String"
-
-    ^ String new:size
-
-    "Created: / 3.8.1998 / 14:46:34 / cg"
-!
-
 postCopy
     "when copied, make me a real (mutable) String"
 
@@ -148,6 +132,10 @@
     sz := self size.
     ^ (String new:sz) replaceFrom:1 to:sz with:self startingAt:1
 
+    "
+     'hello world' asImmutableString shallowCopy
+    "
+
     "Created: / 3.8.1998 / 14:47:00 / cg"
 ! !
 
@@ -192,13 +180,13 @@
 !ImmutableString class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableString.st,v 1.10 2012/02/27 19:44:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ImmutableString.st,v 1.11 2012/04/21 16:01:10 stefan Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/ImmutableString.st,v 1.10 2012/02/27 19:44:31 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/ImmutableString.st,v 1.11 2012/04/21 16:01:10 stefan Exp §'
 !
 
 version_SVN
-    ^ '$Id: ImmutableString.st 10792 2012-03-21 17:45:38Z vranyj1 $'
+    ^ '$Id: ImmutableString.st 10807 2012-05-05 21:58:24Z vranyj1 $'
 ! !