X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_main.pas;h=20419ecc0299fcfc9ae8b4fc982f8f77ff58bcf1;hp=ab6e1d8498b9de28c655539f2bf4c985c8a1a8c7;hb=be2ad7bf5e09b4ee91a0c5ee741503ace8c7887c;hpb=e1f0d9264e64404de20df057c98c8cc1ac39f856 diff --git a/src/game/g_main.pas b/src/game/g_main.pas index ab6e1d8..20419ec 100644 --- a/src/game/g_main.pas +++ b/src/game/g_main.pas @@ -372,6 +372,11 @@ begin Inc(i); GameWADName := ParamStr(i); end; + '--config': + begin + Inc(i); + gConfigScript := ParamStr(i); + end; end; Inc(i) end; @@ -502,7 +507,6 @@ procedure Main(); {$IFDEF ENABLE_HOLMES} var flexloaded: Boolean; {$ENDIF} - var s: AnsiString; begin InitPath; InitPrep; @@ -511,9 +515,6 @@ begin g_Options_SetDefault; g_Options_SetDefaultVideo; - s := CONFIG_FILENAME; - if e_FindResource(ConfigDirs, s) = true then - g_Options_Read(s); g_Console_SysInit; if sys_SetDisplayMode(gRC_Width, gRC_Height, gBPP, gRC_FullScreen, gRC_Maximized) = False then raise Exception.Create('Failed to set videomode on startup.');