From 87bfc99a1c95e42a1ccc9a87fa334e95be246fca Mon Sep 17 00:00:00 2001 From: mattias Date: Sun, 20 Jan 2019 10:13:51 +0000 Subject: [PATCH] IDE: fixed compile under fpc trunk git-svn-id: trunk@60118 - --- packager/fppkghelper.pas | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) diff --git a/packager/fppkghelper.pas b/packager/fppkghelper.pas index 1a8a82ec4b..0f3bc5e5b8 100644 --- a/packager/fppkghelper.pas +++ b/packager/fppkghelper.pas @@ -8,8 +8,10 @@ uses Classes, SysUtils, {$IFNDEF VER3_0} + IDEDialogs, pkgFppkg, - {$ENDIF VER3_0} + LazarusIDEStrConsts, + {$ENDIF} fprepos, Dialogs; @@ -49,7 +51,10 @@ var { TFppkgHelper } constructor TFppkgHelper.Create; -{$IFNDEF VER3_0} +{$IFDEF VER3_0} +begin +end; +{$ELSE} var FPpkg: TpkgFPpkg; begin @@ -75,10 +80,6 @@ begin finally FPpkg.Free; end; -end; -{$ELSE} -begin - end; {$ENDIF VER3_0} @@ -99,7 +100,9 @@ end; function TFppkgHelper.HasPackage(const PackageName: string): Boolean; begin -{$IFNDEF VER3_0} +{$IFDEF VER3_0} + Result := HasFPCPackagesOnly(PackageName); +{$ELSE } if IsProperlyConfigured() then begin Result := @@ -121,8 +124,6 @@ begin end else Result := HasFPCPackagesOnly(PackageName); -{$ELSE } - Result := HasFPCPackagesOnly(PackageName); {$ENDIF VER3_0} end;