moparisthebest/hexchat
1
0
Fork 0
mirror of https://github.com/moparisthebest/hexchat synced 2024-11-26 11:12:19 -05:00
Code Issues Releases Wiki Activity

Backed out changeset: fdf3e1276dbe

Browse Source
This commit is contained in:
berkeviktor@aol.com 2010-12-07 01:15:05 +01:00
parent f1dff76045
commit a36bca1a88
1 changed files with 5 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
build/xchat-wdk.skel.iss
View File

@ -281,25 +281,15 @@ end;
/////////////////////////////////////////////////////////////////////
procedure CurStepChanged(CurStep: TSetupStep);
var
sAppPath: String;
sTempPath: String;
begin
if not (IsTaskSelected('portable')) and (IsUpgrade()) then
if not (IsTaskSelected('portable')) then
begin
if (CurStep=ssInstall) then
begin
sAppPath := ExtractFilePath(Application.ExeName);
sTempPath := GetTempDir();
DelTree(sTempPath + 'gtk-2.0', True, True, True)
RenameFile(sAppPath + 'etc\gtk-2.0', sTempPath + 'gtk-2.0');
UnInstallOldVersion();
end;
if (CurStep=ssPostInstall) then
begin
DelTree(sAppPath + 'etc\gtk-2.0', True, True, True)
RenameFile(sTempPath + 'gtk-2.0', sAppPath + 'etc\gtk-2.0');
if (IsUpgrade()) then
begin
UnInstallOldVersion();
end;
end;
end;
end;