--- a/ImmutableString.st	Tue Mar 22 10:05:11 2005 +0100
+++ b/ImmutableString.st	Wed Mar 30 01:08:25 2005 +0200
@@ -11,7 +11,9 @@
 "
 
 
-String subclass:#ImmutableString
+"{ Package: 'stx:libcomp' }"
+
+String variableByteSubclass:#ImmutableString
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
@@ -150,10 +152,10 @@
      this error is reported on an attempt to store into a literal
      string. The literal was created in creator.
      If you press continue in the debugger, the store will be performed.
-     If you dont want this, press abort and check your code.
+     If you don't want this, press abort and check your code.
      Storing into literals is VERY VERY bad coding style.
     "
-    self error:msg
+    self error:msg mayProceed:true
 
     "Created: / 3.8.1998 / 14:47:45 / cg"
 ! !
@@ -205,5 +207,5 @@
 !ImmutableString class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmutableString.st,v 1.1 1998-08-03 17:08:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmutableString.st,v 1.2 2005-03-29 23:08:25 stefan Exp $'
 ! !