quickSelfTest/RunUnitTestsStart.st
changeset 397 84e6ade7aad9
parent 396 5202f6aaaf39
child 401 9b1d27b1d333
--- 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.                          
+            ].
         ].
     ].