--- a/ApplicationModel.st	Thu Aug 09 17:35:43 2018 +0200
+++ b/ApplicationModel.st	Thu Aug 09 18:10:07 2018 +0200
@@ -4112,10 +4112,10 @@
      Subclasses may redefine this to use another mechanism"
 
     aString size == 0 ifTrue:[^ nil]. 
-    ^ self resources stringWithCRs:aString
+    ^ self resources stringWithCRs:aString asString
 
     "Modified: / 27-02-2017 / 13:50:46 / cg"
-    "Modified: / 09-08-2018 / 15:09:21 / Claus Gittinger"
+    "Modified: / 09-08-2018 / 18:08:56 / Claus Gittinger"
 !
 
 translateString:aString with:anArgument
@@ -4123,9 +4123,10 @@
      We use the resources as default.
      Subclasses may redefine this to use another mechanism"
 
-    ^ self resources stringWithCRs:aString with:anArgument
+    ^ self resources stringWithCRs:aString asString with:anArgument
 
     "Created: / 25-11-2016 / 09:54:32 / cg"
+    "Modified: / 09-08-2018 / 18:09:26 / Claus Gittinger"
 !
 
 translateString:aString with:argument1 with:argument2
@@ -4133,9 +4134,10 @@
      We use the resources as default.
      Subclasses may redefine this to use another mechanism"
 
-    ^ self resources stringWithCRs:aString with:argument1 with:argument2
+    ^ self resources stringWithCRs:aString asString with:argument1 with:argument2
 
     "Created: / 09-08-2018 / 15:08:11 / Claus Gittinger"
+    "Modified: / 09-08-2018 / 18:09:30 / Claus Gittinger"
 !
 
 translateString:aString withArguments:anArgumentVector
@@ -4143,9 +4145,10 @@
      We use the resources as default.
      Subclasses may redefine this to use another mechanism"
 
-    ^ self resources stringWithCRs:aString withArguments:anArgumentVector
+    ^ self resources stringWithCRs:aString asString withArguments:anArgumentVector
 
     "Created: / 09-08-2018 / 14:53:55 / Claus Gittinger"
+    "Modified: / 09-08-2018 / 18:09:34 / Claus Gittinger"
 ! !
 
 !ApplicationModel methodsFor:'user interaction & notifications'!