Fixed esf

This commit is contained in:
David Anderson 2005-08-03 01:17:27 +00:00
parent 8f61073f43
commit 5be9ba4a68
3 changed files with 4 additions and 4 deletions

View File

@ -385,7 +385,7 @@ begin
end; end;
end; end;
modESF: begin modESF: begin
if Pos('esforce', DirList[i]) = 1 then begin if Pos('esf', DirList[i]) = 1 then begin
MakeDir(ePath + 'addons\amxmodx\' + Copy(DirList[i], 4, Length(DirList[i]))); MakeDir(ePath + 'addons\amxmodx\' + Copy(DirList[i], 4, Length(DirList[i])));
AddStatus('Created directory: addons\amxmodx\' + Copy(DirList[i], 4, Length(DirList[i])), clBlack); AddStatus('Created directory: addons\amxmodx\' + Copy(DirList[i], 4, Length(DirList[i])), clBlack);
end; end;
@ -440,7 +440,7 @@ begin
end; end;
end; end;
modESF: begin modESF: begin
if Pos('esforce', FileList[i]) = 1 then begin if Pos('esf', FileList[i]) = 1 then begin
FileCopy(ExtractFilePath(ParamStr(0)) + 'files\' + FileList[i], ePath + 'addons\amxmodx\' + Copy(FileList[i], 4, Length(FileList[i])), CopyConfig); FileCopy(ExtractFilePath(ParamStr(0)) + 'files\' + FileList[i], ePath + 'addons\amxmodx\' + Copy(FileList[i], 4, Length(FileList[i])), CopyConfig);
AddStatus('Copied file: addons\amxmodx\' + Copy(FileList[i], 4, Length(FileList[i])), clBlack); AddStatus('Copied file: addons\amxmodx\' + Copy(FileList[i], 4, Length(FileList[i])), clBlack);
end; end;

View File

@ -242,7 +242,7 @@ initialization
eModsPath.Add('wizwars'); eModsPath.Add('wizwars');
eModsPath.Add('wormshl'); eModsPath.Add('wormshl');
eModsPath.Add('zp'); eModsPath.Add('zp');
eModsPath.Add('esforce'); eModsPath.Add('esf');
finalization finalization

View File

@ -258,7 +258,7 @@ begin
if MessageBox(Handle, 'Install The Specialists addon?', PChar(Application.Title), MB_ICONQUESTION + MB_YESNO) = mrYes then if MessageBox(Handle, 'Install The Specialists addon?', PChar(Application.Title), MB_ICONQUESTION + MB_YESNO) = mrYes then
ChosenMod := modTS; ChosenMod := modTS;
end; end;
if ePath = 'esforce' then begin if ePath = 'esf' then begin
if MessageBox(Handle, 'Install Earth''s Special Forces addon?', PChar(Application.Title), MB_ICONQUESTION + MB_YESNO) = mrYes then if MessageBox(Handle, 'Install Earth''s Special Forces addon?', PChar(Application.Title), MB_ICONQUESTION + MB_YESNO) = mrYes then
ChosenMod := modESF; ChosenMod := modESF;
end; end;