diff --git a/packages/fcl-fpcunit/src/consoletestrunner.pas b/packages/fcl-fpcunit/src/consoletestrunner.pas
index dac53ce801..c0e459aa1e 100644
--- a/packages/fcl-fpcunit/src/consoletestrunner.pas
+++ b/packages/fcl-fpcunit/src/consoletestrunner.pas
@@ -497,6 +497,8 @@ var
 begin
   Terminate;
   FormatParam := DefaultFormat;
+  If DefaultRunAllTests then
+    FRunMode:=rmAll;
   S := CheckOptions(GetShortOpts, LongOpts);
   if (S <> '') then
     begin