From 1a654e3c8bfa535729be8223bd8d49484d1ffabe Mon Sep 17 00:00:00 2001 From: mattias Date: Thu, 20 Oct 2016 20:20:38 +0000 Subject: [PATCH] lazbuild: fixed build git-svn-id: trunk@53185 - --- ide/lazbuild.lpr | 1 + packager/packagesystem.pas | 1 + 2 files changed, 2 insertions(+) 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);