paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 09:29:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

Packager: fixed compilation breakage with FPC 3.0.4 after r59720 #0e016b16dc, bug #34652 and lots of other reports.

Browse Source 
git-svn-id: trunk@59731 -
This commit is contained in:
maxim 2018-12-05 22:35:14 +00:00
parent d69ccc1655
commit 6d64beff69
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
packager/fppkghelper.pas
View File

@ -125,11 +125,17 @@ begin
end;
function TFppkgHelper.GetPackageUnitPath(const PackageName: string): string;
{$IFNDEF VER3_0}
var
FppkgPackage: TFPPackage;
{$ENDIF VER3_0}
begin
{$IFNDEF VER3_0}
FppkgPackage := FFPpkg.FindPackage(PackageName, pkgpkInstalled);
Result := FppkgPackage.PackagesStructure.GetUnitDirectory(FppkgPackage);
{$ELSE }
Result := '';
{$ENDIF VER3_0}
end;
finalization