mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-26 23:48:22 +02:00
Packager: Fix a crash when adding a package dependency which already is there. Issue #29680.
git-svn-id: trunk@51896 -
This commit is contained in:
parent
db4dd486f3
commit
1343b1dd2f
@ -927,13 +927,12 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
NewDependency.PackageName:=DependPkgNameComboBox.Text;
|
NewDependency.PackageName:=DependPkgNameComboBox.Text;
|
||||||
if CheckAddingDependency(LazPackage,NewDependency,false,true)<>mrOk then exit;
|
ModalResult:=CheckAddingDependency(LazPackage,NewDependency,false,true);
|
||||||
|
if ModalResult<>mrOk then exit;
|
||||||
|
|
||||||
// ok
|
// ok
|
||||||
Params.Dependency:=NewDependency;
|
Params.Dependency:=NewDependency;
|
||||||
NewDependency:=nil;
|
NewDependency:=nil;
|
||||||
|
|
||||||
ModalResult:=mrOk;
|
|
||||||
finally
|
finally
|
||||||
NewDependency.Free;
|
NewDependency.Free;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user