--- a/Parser.st	Sat Mar 03 10:02:41 2018 +0100
+++ b/Parser.st	Fri Mar 16 10:50:01 2018 +0100
@@ -2730,7 +2730,8 @@
 "/            self
 "/                warnCommonMistake:('variable "',aVariableName,'" should be named "',whatShouldItBeNamed,'" (by english language rules)')
 "/                position:tokenPosition to:source position1Based - 1.
-            msg := ('variable "',aVariableName,'" should be named "',whatShouldItBeNamed,'" (by english language rules)').
+            msg := ('variable "%1" should be named "%2" (by english language rules)\But please check - I don''t know all exceptions and may be wrong ;-(') withCRs
+                    bindWith:aVariableName with:whatShouldItBeNamed.
             self
                 warning:msg
                 doNotShowAgainAction:[ parserFlags warnAboutWrongVariableNames:false. ParserFlags warnAboutWrongVariableNames:false ]