don't uninstall when portable install is performed

This commit is contained in:
berkeviktor@aol.com 2010-08-23 22:32:22 +02:00
parent 04329bc07b
commit 7bf6ac9aa7

View File

@ -225,11 +225,14 @@ end;
///////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////
procedure CurStepChanged(CurStep: TSetupStep); procedure CurStepChanged(CurStep: TSetupStep);
begin begin
if (CurStep=ssInstall) then if not (IsTaskSelected('portablemode')) then
begin begin
if (IsUpgrade()) then if (CurStep=ssInstall) then
begin begin
UnInstallOldVersion(); if (IsUpgrade()) then
begin
UnInstallOldVersion();
end;
end; end;
end; end;
end; end;