--- a/ParserFlags.st	Wed Nov 02 14:50:08 2016 +0100
+++ b/ParserFlags.st	Wed Nov 02 17:57:36 2016 +0100
@@ -1888,7 +1888,7 @@
         MakeCommand := 'make'.
     ].
 
-    Smalltalk infoPrinting ifTrue:[
+    (Smalltalk verbose and:[ Smalltalk infoPrinting ]) ifTrue:[
         'ParserFlags [info]: STC Setup:' infoPrintCR.
         ('ParserFlags [info]:  STCCompilationDefines: ',(STCCompilationDefines?'')) infoPrintCR.
         ('ParserFlags [info]:  CCPath: ',CCPath asString) infoPrintCR.