From a6975f0f6657c74e810629b8b8822a28138457f5 Mon Sep 17 00:00:00 2001 From: juha Date: Mon, 2 Jan 2017 22:26:21 +0000 Subject: [PATCH] Converter: Fix the return value of MaybeAddPackageDep. (It was not used yet, no bugs caused.) git-svn-id: trunk@53844 - --- converter/usedunits.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/converter/usedunits.pas b/converter/usedunits.pas index 55ac4cff4b..9f2a5a57bb 100644 --- a/converter/usedunits.pas +++ b/converter/usedunits.pas @@ -651,6 +651,7 @@ end; function TUsedUnitsTool.MaybeAddPackageDep(aUnitName: string): Boolean; // Add a dependency to a package containing the unit and open it. // Called when the unit is not found. +// Returns True if a dependency was really added. var s: String; begin @@ -658,7 +659,7 @@ begin s:=''; if fCTLink.CodeTool.DirectoryCache.FindUnitSourceInCompletePath(aUnitName,s,True) = '' then if Assigned(fOnCheckPackageDependency) then - Result := not fOnCheckPackageDependency(aUnitName); + Result := fOnCheckPackageDependency(aUnitName); end; function TUsedUnitsTool.ConvertUsed: TModalResult;