diff --git a/ide/lazbuild.lpr b/ide/lazbuild.lpr
index 3b5c88f72c..face48cb9a 100644
--- a/ide/lazbuild.lpr
+++ b/ide/lazbuild.lpr
@@ -867,6 +867,7 @@ var
 
     if (CompReason in Project1.CompilerOptions.CompileReasons) then begin
       // compile
+
       // write state file to avoid building clean every time
       if Project1.SaveStateFile(CompilerFilename,CompilerParams,false)<>mrOk then
         Error(ErrorBuildFailed,'failed saving statefile of project '+AFilename);
diff --git a/packager/packagesystem.pas b/packager/packagesystem.pas
index c032f3e051..101924aca5 100644
--- a/packager/packagesystem.pas
+++ b/packager/packagesystem.pas
@@ -676,6 +676,7 @@ var
   Param: TFPCParamValue;
   Msg: String;
 begin
+  if IDEMessagesWindow=nil then exit;
   ParsedParams:=TObjectList.Create(true);
   try
     ParseFPCParameters(CompilerParams,ParsedParams);