Packager: Tweak AddPkgDependencyDialog.

git-svn-id: trunk@63986 -
This commit is contained in:
juha 2020-10-09 18:39:05 +00:00
parent a8297cc43b
commit 823660192e

View File

@ -250,17 +250,17 @@ end;
procedure TAddPkgDependencyDialog.CloseButtonClick(Sender: TObject); procedure TAddPkgDependencyDialog.CloseButtonClick(Sender: TObject);
// CloseButton is now "Install". // CloseButton is now "Install".
var
OpmRes: TModalResult;
begin begin
ModalResult := mrNone; ModalResult := mrNone;
OpmRes := InstallOnlinePackages; case InstallOnlinePackages of
if OpmRes = mrCancel then Exit; mrCancel: Exit;
UpdateAvailableDependencyNames; mrRetry: // mrRetry means the IDE must be rebuilt.
if OpmRes = mrRetry then // mrRetry means the IDE must be rebuilt. begin
begin Self.Hide;
Self.Hide; MainIDEInterface.DoBuildLazarus([]);
MainIDEInterface.DoBuildLazarus([]); end;
else
UpdateAvailableDependencyNames;
end; end;
end; end;