--- a/quickSelfTest/RunUnitTestsStart.st Tue Oct 10 15:08:31 2017 +0200
+++ b/quickSelfTest/RunUnitTestsStart.st Tue Oct 10 15:09:25 2017 +0200
@@ -52,8 +52,12 @@
'stx:goodies/regression'
) do:[:eachPackage |
(allPackageIDs includes:eachPackage) ifFalse:[
- Stdout showCR:'error: missing package ', eachPackage.
- Smalltalk exit:1.
+ Smalltalk isStandAloneApp ifTrue:[
+ Stdout showCR:'error: missing package ', eachPackage.
+ Smalltalk exit:1.
+ ] ifFalse:[
+ Transcript showCR:'error: missing package ', eachPackage.
+ ].
].
].