# HG changeset patch
# User sr
# Date 1506692387 -7200
# Node ID ae0315df73cb4f1633ae0366372c2e57423a302f
# Parent  e8c44ab3dbcdf8603aebd8d0df68497ca43e3b59
*** empty log message ***

diff -r e8c44ab3dbcd -r ae0315df73cb quickSelfTest/RunUnitTests.st
--- a/quickSelfTest/RunUnitTests.st	Fri Sep 29 14:10:12 2017 +0200
+++ b/quickSelfTest/RunUnitTests.st	Fri Sep 29 15:39:47 2017 +0200
@@ -36,7 +36,7 @@
      cmdArgs
      unitTestSuite
      eachClassName eachClass
-     result index|
+     result index settingsFilePathName|
 
     doRunSpecificUnitTests := false.
     unitTestSuiteName := 'All Unit Tests'.
@@ -46,7 +46,10 @@
     cmdArgs := Smalltalk commandLineArguments.
     index := cmdArgs indexOf:'--settingsFile'.
     index > 0 ifTrue:[
-	(cmdArgs at:index + 1) asFilename fileIn.
+	settingsFilePathName := cmdArgs at:index + 1.
+	self logInfo:'load settings file: ', settingsFilePathName printString.
+	settingsFilePathName asFilename fileIn.
+	self logInfo:'ParserFlags makeCommand: ', ParserFlags makeCommand printString.
     ].
 
     (cmdArgs includes:'--runOnlyExpeccoUnitTests') ifTrue:[
@@ -76,7 +79,7 @@
 		    logWarning:('corrupted unit test class detected, please fix #%1'
 			bindWith:eachClassName).
 	    ] ifFalse:[
-			eachClassName notNil ifTrue:[
+		eachClassName notNil ifTrue:[
 				eachClass := Smalltalk
 					fileInClass:eachClassName
 					package:'stx:goodies/regression'.