"--dbg-mainwad-restore" and "--dbg-mainwad wad"

diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index 1b649f869437becf0ca270444a1353a2d399e066..2e8f6b1aaf2c1416a35efe0f59adabfa5d15f9f6 100644 (file)
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
@@ -6937,12 +6937,18 @@ begin
     Exit;
   end;
 
-  s := LowerCase(Find_Param_Value(pars, '-dbg-mainwad'));
+  s := LowerCase(Find_Param_Value(pars, '--dbg-mainwad'));
   if (s <> '') then
   begin
     gDefaultMegawadStart := s;
   end;
 
+  s := LowerCase(Find_Param_Value(pars, '--dbg-mainwad-restore'));
+  if (s <> '') then
+  begin
+    gDefaultMegawadStart := DF_Default_Megawad_Start;
+  end;
+
 // Start map when game loads:
   map := LowerCase(Find_Param_Value(pars, '-map'));
   if isWadPath(map) then