source/metamod-source
1
0
Fork 0
mirror of https://github.com/alliedmodders/metamod-source.git synced 2025-12-11 08:08:24 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

now overwrites VDF plugin even if it already exists

Browse Source 
--HG--
branch : sourcemm-1.4.3
extra : convert_revision : svn%3Ac2935e3e-5518-0410-8daf-afa5dab7d4e3/branches/sourcemm-1.4.3%40616
This commit is contained in:
Christian Hammacher 2008-01-13 23:19:44 +00:00
parent f600fde8a2
commit f09aaee393
2 changed files with 19 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
installer/MMS_Installer.exe
View File

Binary file not shown.

35
installer/UnitInstall.pas
View File

@ -448,12 +448,12 @@ begin
except except
AddSkipped; AddSkipped;
end; end;
{ Create/Edit VDF Plugin } { Check VDF Plugin }
CopyConfig := True; CopyConfig := True;
frmMain.ggeAll.Progress := 3; frmMain.ggeAll.Progress := 3;
frmMain.ggeItem.Progress := 0; frmMain.ggeItem.Progress := 0;
AddStatus('Creating VDF Plugin...', clBlack); AddStatus('Creating VDF Plugin...', clBlack);
eStr := TStringList.Create; eStr := TStringList.Create;
try try
@ -464,10 +464,11 @@ begin
eStr.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf'); eStr.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf');
frmMain.ggeItem.Progress := 2; frmMain.ggeItem.Progress := 2;
if (((Pos('server.dll', eStr.Text) <> 0) and (OS = osWindows)) or ((Pos('server_i486.so', eStr.Text) <> 0) and (OS = osLinux))) then begin if (((Pos('server.dll', eStr.Text) <> 0) and (OS = osWindows)) or ((Pos('server_i486.so', eStr.Text) <> 0) and (OS = osLinux))) then begin
AddSkipped;
case MessageBox(frmMain.Handle, 'A Metamod:Source installation was already detected. If you choose to reinstall, your configuration files will be erased. Click Yes to continue, No to Upgrade, or Cancel to abort the install.', PChar(frmMain.Caption), MB_ICONQUESTION + MB_YESNOCANCEL) of case MessageBox(frmMain.Handle, 'A Metamod:Source installation was already detected. If you choose to reinstall, your configuration files will be erased. Click Yes to continue, No to Upgrade, or Cancel to abort the install.', PChar(frmMain.Caption), MB_ICONQUESTION + MB_YESNOCANCEL) of
mrNo: CopyConfig := False; mrNo: begin
AddSkipped;
CopyConfig := False;
end;
mrCancel: begin mrCancel: begin
Application.Terminate; Application.Terminate;
eStr.Free; eStr.Free;
@ -476,18 +477,20 @@ begin
end; end;
end; end;
except except
frmMain.ggeItem.Progress := 2; // bacon
eStr.Add('"Plugin"');
eStr.Add('{');
if (OS = osWindows) then
eStr.Add(' "file" "..\' + ModDir + '\addons\metamod\bin\server.dll"')
else
eStr.Add(' "file" "../' + ModDir + '/addons/metamod/bin/server_i486.so"');
eStr.Add('}');
eStr.SaveToFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf');
UploadFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf', 'metamod.vdf');
frmMain.ggeItem.Progress := 3;
end; end;
{ Create and Upload plugin here }
frmMain.ggeItem.Progress := 2;
eStr.Add('"Plugin"');
eStr.Add('{');
if (OS = osWindows) then
eStr.Add(' "file" "..\' + ModDir + '\addons\metamod\bin\server.dll"')
else
eStr.Add(' "file" "../' + ModDir + '/addons/metamod/bin/server_i486.so"');
eStr.Add('}');
eStr.SaveToFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf');
UploadFile(ExtractFilePath(ParamStr(0)) + 'metamod.vdf', 'metamod.vdf');
frmMain.ggeItem.Progress := 3;
{ Upload metaplugins.ini } { Upload metaplugins.ini }
frmMain.ggeAll.Progress := 4; frmMain.ggeAll.Progress := 4;
frmMain.ggeItem.MaxValue := 1; frmMain.ggeItem.MaxValue := 1;