mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 08:19:41 +02:00
IDE: fixed AddUnitDependenciesForComponentClasses when component has no deps
git-svn-id: trunk@62660 -
This commit is contained in:
parent
1ba42be4c3
commit
9a9174aa69
@ -4498,7 +4498,6 @@ var
|
||||
|
||||
var
|
||||
Dependencies: TPackagePackageArray;
|
||||
|
||||
begin
|
||||
Result:=mrCancel;
|
||||
UnitNames:=nil;
|
||||
@ -4509,8 +4508,11 @@ begin
|
||||
Dependencies,UnitNames);
|
||||
if Result<>mrOk then exit;
|
||||
|
||||
Result:=FilterMissingDependenciesForUnit(UnitFilename,Dependencies,MissingDependencies);
|
||||
if Result<>mrOk then exit;
|
||||
if (Dependencies<>nil) then
|
||||
begin
|
||||
Result:=FilterMissingDependenciesForUnit(UnitFilename,Dependencies,MissingDependencies);
|
||||
if Result<>mrOk then exit;
|
||||
end;
|
||||
|
||||
Result:=RemoveExistingUnitnames;
|
||||
if Result<>mrOk then exit;
|
||||
|
Loading…
Reference in New Issue
Block a user