* Default is to run all tests, plain format

git-svn-id: trunk@30322 -

packages/fcl-fpcunit/src/tests/frameworktest.pp

@@ -40,6 +40,8 @@ Var
   App : TFPCUnitRunner;
 
 begin
+  DefaultFormat:=fPlain;
+  DefaultRunAllTests:=True;
   App:=TFPCUnitRunner.Create(Nil);
   App.Initialize;
   App.Title := 'FPCUnit Test Suite';