win32: Silent installer improvements

- Launch uninstaller as VERYSILENT
- Don't launch Python/Perl installers when silent
This commit is contained in:
TingPing 2014-06-27 19:10:55 -04:00 committed by TingPing
parent 3e3939b3f0
commit 7d08750955

View File

@ -273,6 +273,8 @@ begin
if IsComponentSelected('spell') and not CheckSpellInstall() then
idpAddFile(SPELL, ExpandConstant('{tmp}\spelling-dicts.exe'));
if not WizardSilent() then
begin
if IsComponentSelected('langs\perl') and not CheckDLL('perl520.dll') then
idpAddFile(PERL, ExpandConstant('{tmp}\perl.msi'));
@ -284,6 +286,7 @@ begin
end;
end;
end;
end;
/////////////////////////////////////////////////////////////////////
// Disable portable-mode if installing to program files
@ -356,7 +359,7 @@ begin
sUnInstallString := GetUninstallString();
if sUnInstallString <> '' then begin
sUnInstallString := RemoveQuotes(sUnInstallString);
if Exec(sUnInstallString, '/SILENT /NORESTART /SUPPRESSMSGBOXES','', SW_HIDE, ewWaitUntilTerminated, iResultCode) then
if Exec(sUnInstallString, '/VERYSILENT /NORESTART /SUPPRESSMSGBOXES','', SW_HIDE, ewWaitUntilTerminated, iResultCode) then
Result := 3
else
Result := 2;