diff --git a/ide/exttoolsconsole.pas b/ide/exttoolsconsole.pas
index cd8836bd5a..0ef1d4f93c 100644
--- a/ide/exttoolsconsole.pas
+++ b/ide/exttoolsconsole.pas
@@ -229,6 +229,7 @@ end;
 function TExternalToolsConsole.GetIDEObject(ToolData: TIDEExternalToolData): TObject;
 begin
   raise Exception.Create('TExternalToolsConsole.GetIDEObject: Should not happen!');
+  Result:=ToolData;
 end;
 
 procedure TExternalToolsConsole.HandleMesages;
diff --git a/packager/fppkghelper.pas b/packager/fppkghelper.pas
index f2c21a0356..be1adc527e 100644
--- a/packager/fppkghelper.pas
+++ b/packager/fppkghelper.pas
@@ -6,11 +6,11 @@ interface
 
 uses
   Classes,
-  SysUtils,
+  SysUtils
   {$IFNDEF VER3_0}
-  pkgFppkg,
+  , pkgFppkg, fprepos
   {$ENDIF VER3_0}
-  fprepos;
+  ;
 
 type
 
@@ -101,6 +101,7 @@ begin
     end;
 {$ELSE }
   Result := True;
+  if PackageName='' then ;
 {$ENDIF VER3_0}
 end;
 
@@ -121,6 +122,7 @@ begin
       end;
     end;
 {$ENDIF VER3_0}
+  if AList=nil then ;
 end;
 
 finalization