--- a/ApplicationModel.st	Tue Sep 18 21:10:29 2018 +0200
+++ b/ApplicationModel.st	Thu Sep 20 09:48:06 2018 +0200
@@ -4423,12 +4423,12 @@
 !
 
 warnUntranslated:aString
-    "like Object's warn, but optionally translates the string via the
-     resourcePack, thus giving a translated string automatically"
+    "do not translate the string via the resourcePack"
 
     super warn:aString.
 
     "Created: / 09-08-2018 / 15:33:29 / Claus Gittinger"
+    "Modified (comment): / 20-09-2018 / 09:46:26 / Stefan Vogel"
 !
 
 withCursor:aCursor do:aBlock