diff --git a/src/editor/Editor.lpr b/src/editor/Editor.lpr
index b96ed23cf0adbf4d55c0d167410ffcd8685dead4..18f997c7c142c491e02c5f14ab87c1796c0abeba 100644 (file)
--- a/src/editor/Editor.lpr
+++ b/src/editor/Editor.lpr
Inc(i);
EditorWad := ParamStr(i);
end;
+ end
+ else if p = '--wads-dir' then
+ begin
+ if i + 1 <= ParamCount then
+ begin
+ Inc(i);
+ WadsDir := ParamStr(i);
+ end;
end;
Inc(i);
end;
end;
procedure CheckParamFiles;
- var i: Integer; path: AnsiString;
+ var i: Integer;
begin
i := ParamFileIndex;
if i <= ParamCount then
- begin
- path := ParamStr(i);
- if path <> '' then
- OpenMap(path, '');
- end;
+ StartMap := ParamStr(i);
end;
procedure InitLogs;
CfgFileName := EditorDir + DirectorySeparator + 'Editor.cfg';
GameWad := EditorDir + DirectorySeparator + 'data' + DirectorySeparator + 'game.wad';
EditorWad := EditorDir + DirectorySeparator + 'data' + DirectorySeparator + 'editor.wad';
+ WadsDir := EditorDir + DirectorySeparator + 'wads';
CheckParamOptions;
InitLogs;