--- a/AbstractLauncherApplication.st	Wed Nov 16 23:01:02 2016 +0100
+++ b/AbstractLauncherApplication.st	Wed Nov 16 23:01:30 2016 +0100
@@ -3293,12 +3293,12 @@
     "open a dialog on compiler related settings.
      Obsoleted by the settings application"
 
-    |box warnings warnSTX warnUnderscore warnDollar warnOldStyle warnUnusedVars
-     allowDollar allowUnderscore allowSqueakExtensions allowQualifiedNames
+    |box warnings warnSTX warnUnderscore warnDollar warnParagraph warnOldStyle warnUnusedVars
+     allowDollar allowParagraph allowUnderscore allowSqueakExtensions allowQualifiedNames
      allowDolphinExtensions allowOldStyleAssignment allowReservedWordsAsSelectors
      immutableArrays
      warnSTXBox warnUnderscoreBox warnOldStyleBox warnCommonMistakes warnCommonMistakesBox
-     warnCompatibility warnCompatibilityBox warnDollarBox warnUnusedVarsBox
+     warnCompatibility warnCompatibilityBox warnDollarBox warnParagraphBox warnUnusedVarsBox
      stcCompilation compilationList stcCompilationOptions
      historyLines fullHistoryUpdate
      catchMethodRedefs catchClassRedefs keepSourceOptions keepSource
@@ -3319,12 +3319,14 @@
     warnSTX := ParserFlags warnSTXSpecials asValue.
     warnUnderscore := ParserFlags warnUnderscoreInIdentifier asValue.
     warnDollar := ParserFlags warnDollarInIdentifier asValue.
+    warnParagraph := ParserFlags warnParagraphInIdentifier asValue.
     warnOldStyle := ParserFlags warnOldStyleAssignment asValue.
     warnCommonMistakes := ParserFlags warnCommonMistakes asValue.
     warnCompatibility := ParserFlags warnPossibleIncompatibilities asValue.
     warnUnusedVars := ParserFlags warnUnusedVars asValue.
     allowUnderscore := ParserFlags allowUnderscoreInIdentifier asValue.
     allowDollar := ParserFlags allowDollarInIdentifier asValue.
+    allowParagraph := ParserFlags allowParagraphInIdentifier asValue.
     allowSqueakExtensions := ParserFlags allowSqueakExtensions asValue.
     allowDolphinExtensions := ParserFlags allowDolphinExtensions asValue.
     allowQualifiedNames := ParserFlags allowQualifiedNames asValue.
@@ -3378,6 +3380,7 @@
                 warnUnusedVarsBox enable.
                 warnUnderscoreBox enabled:allowUnderscore.
                 warnDollarBox enabled:allowDollar.
+                warnParagraphBox enabled:allowParagraph.
               ] ifFalse:[
                 warnSTXBox disable.
                 warnUnderscoreBox disable.
@@ -3386,11 +3389,13 @@
                 warnCommonMistakesBox disable.
                 warnCompatibilityBox disable.
                 warnUnusedVarsBox disable.
+                warnParagraphBox disable.
               ]].
 
     warnings onChangeEvaluate:warnEnabler.
     allowUnderscore onChangeEvaluate:warnEnabler.
     allowDollar onChangeEvaluate:warnEnabler.
+    allowParagraph onChangeEvaluate:warnEnabler.
 "/    allowSqueakExtensions onChangeEvaluate:warnEnabler.
 "/    allowQualifiedNames onChangeEvaluate:warnEnabler.
 
@@ -3460,6 +3465,9 @@
     component := box addCheckBox:(resources string:'Allow Dollar in Identifiers') on:allowDollar.
     component width:0.4.
 
+    component := box addCheckBox:(resources string:'Allow Paragraph in Identifiers') on:allowParagraph.
+    component width:0.4.
+
     component := box addCheckBox:(resources string:'Allow VW3 QualifiedNames') on:allowQualifiedNames.
     component width:0.4.
 
@@ -3511,6 +3519,9 @@
     warnDollarBox := box addCheckBox:(resources string:'Dollars in Identifiers') on:warnDollar.
     warnDollarBox width:0.4.
 
+    warnParagraphBox := box addCheckBox:(resources string:'Paragraphs in Identifiers') on:warnParagraph.
+    warnParagraphBox width:0.4.
+
     warnUnusedVarsBox := box addCheckBox:(resources string:'Unused Method Variables') on:warnUnusedVars.
     warnUnusedVarsBox width:0.4.
 
@@ -3591,7 +3602,7 @@
 
     "Modified: / 10-09-1995 / 19:19:18 / claus"
     "Modified: / 09-09-1996 / 22:42:47 / stefan"
-    "Modified: / 26-09-2012 / 14:16:39 / cg"
+    "Modified: / 16-11-2016 / 22:37:24 / cg"
 !
 
 displaySettings