win32: Silent installer improvements
- Launch uninstaller as VERYSILENT - Don't launch Python/Perl installers when silent
This commit is contained in:
parent
3e3939b3f0
commit
7d08750955
@ -273,6 +273,8 @@ begin
|
|||||||
if IsComponentSelected('spell') and not CheckSpellInstall() then
|
if IsComponentSelected('spell') and not CheckSpellInstall() then
|
||||||
idpAddFile(SPELL, ExpandConstant('{tmp}\spelling-dicts.exe'));
|
idpAddFile(SPELL, ExpandConstant('{tmp}\spelling-dicts.exe'));
|
||||||
|
|
||||||
|
if not WizardSilent() then
|
||||||
|
begin
|
||||||
if IsComponentSelected('langs\perl') and not CheckDLL('perl520.dll') then
|
if IsComponentSelected('langs\perl') and not CheckDLL('perl520.dll') then
|
||||||
idpAddFile(PERL, ExpandConstant('{tmp}\perl.msi'));
|
idpAddFile(PERL, ExpandConstant('{tmp}\perl.msi'));
|
||||||
|
|
||||||
@ -283,6 +285,7 @@ begin
|
|||||||
idpAddFile(PY3, ExpandConstant('{tmp}\python.msi'));
|
idpAddFile(PY3, ExpandConstant('{tmp}\python.msi'));
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
/////////////////////////////////////////////////////////////////////
|
/////////////////////////////////////////////////////////////////////
|
||||||
@ -356,7 +359,7 @@ begin
|
|||||||
sUnInstallString := GetUninstallString();
|
sUnInstallString := GetUninstallString();
|
||||||
if sUnInstallString <> '' then begin
|
if sUnInstallString <> '' then begin
|
||||||
sUnInstallString := RemoveQuotes(sUnInstallString);
|
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
|
Result := 3
|
||||||
else
|
else
|
||||||
Result := 2;
|
Result := 2;
|
||||||
|
Loading…
Reference in New Issue
Block a user