# HG changeset patch # User Claus Gittinger # Date 1553774745 -3600 # Node ID 1ccf832eb9e7ca3db77ae0caa13d2ab6c88f04bf # Parent 743b92de4b9bdaa445eecd8a74d9e7b7cb0fe6de *** empty log message *** diff -r 743b92de4b9b -r 1ccf832eb9e7 quickSelfTest/RunUnitTestsStart.st --- a/quickSelfTest/RunUnitTestsStart.st Wed Mar 27 04:29:24 2019 +0000 +++ b/quickSelfTest/RunUnitTestsStart.st Thu Mar 28 13:05:45 2019 +0100 @@ -18,7 +18,7 @@ Only for standalone startup. [author:] - sr + sr [instance variables:] @@ -35,11 +35,11 @@ self verboseInfo:('starting application'). self startStartBlockProcess. - "install a global handler, - which suppresses the updating of the change file" + "install a global handler, + which suppresses the updating of the change file" Processor activeProcess exceptionHandlerSet - on:(Class updateChangeFileQuerySignal) - do:[:ex | ex proceedWith:false]. + on:(Class updateChangeFileQuerySignal) + do:[:ex | ex proceedWith:false]. "run the unit tests" RunUnitTests runWithCompiledUnitTestClasses:true. @@ -47,8 +47,8 @@ setupSmalltalkFromArguments:argv (argv includes:'/?') ifTrue:[ - self usage. - AbortOperationRequest raise. + self usage. + AbortOperationRequest raise. ]. ^ super setupSmalltalkFromArguments:argv @@ -62,6 +62,7 @@ Stderr nextPutLine:' --resultFile......................path to a file for storing the result as xml'. Stderr nextPutLine:' --forceTestCase testName .........class name of a test case (only this test case will be executed)'. Stderr nextPutLine:' --run testName ...................same, shorter'. + Stderr nextPutLine:' --skip testName ..................skip a test class'. "Modified: / 26-03-2019 / 18:47:53 / Claus Gittinger" ! ! @@ -75,4 +76,3 @@ version_CVS ^ '$Header$' ! ! -