--- a/ParserFlags.st	Wed Mar 30 13:49:54 2016 +0200
+++ b/ParserFlags.st	Fri Apr 01 12:27:24 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
  COPYRIGHT (c) 2005 by eXept Software AG
@@ -1803,14 +1805,17 @@
         MakeCommand := 'make'.
     ].
 
-    Transcript showCR:'STC Setup:'.
-    Transcript showCR:'  STCCompilationDefines:',STCCompilationDefines asString.
-    Transcript showCR:'  CCPath:',CCPath asString.
-    Transcript showCR:'  CCCompilationOptions:',CCCompilationOptions asString.
-    Transcript showCR:'  LinkCommand:',LinkCommand asString.
-    Transcript showCR:'  MakeCommand:',MakeCommand asString.
-    Transcript showCR:'  LinkArgs:',LinkArgs asString.
-    
+    Smalltalk infoPrinting ifTrue:[
+        'ParserFlags [info]:' infoPrintCR.
+        '  STC Setup:' infoPrintCR.
+        ('    STCCompilationDefines: ',STCCompilationDefines asString) infoPrintCR.
+        ('    CCPath: ',CCPath asString) infoPrintCR.
+        ('    CCCompilationOptions: ',CCCompilationOptions asString) infoPrintCR.
+        ('    LinkCommand: ',LinkCommand asString) infoPrintCR.
+        ('    MakeCommand: ',MakeCommand asString) infoPrintCR.
+        ('    LinkArgs: ',LinkArgs asString) infoPrintCR.
+    ].
+
     "
      ParserFlags initializeSTCFlagsForTopDirectory:'../..'
     "