From 130a6629f73b0c4861526f287bbf98752d7ebc6f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 7 Feb 2011 13:48:47 +0000
Subject: [PATCH] IDE: write Makefile.compiled only if changed

git-svn-id: trunk@29411 -
---
 packager/packagesystem.pas | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/packager/packagesystem.pas b/packager/packagesystem.pas
index 09e1e51cdc..beda4614c3 100644
--- a/packager/packagesystem.pas
+++ b/packager/packagesystem.pas
@@ -49,8 +49,9 @@ uses
   Classes, SysUtils, FileProcs, FileUtil, LCLProc, Forms, Controls, Dialogs,
   InterfaceBase,
   // codetools
-  AVL_Tree, Laz_XMLCfg, DefineTemplates, CodeCache, BasicCodeTools,
-  CodeToolsStructs, NonPascalCodeTools, SourceChanger, CodeToolManager,
+  AVL_Tree, Laz_XMLCfg, DefineTemplates, CodeCache,
+  BasicCodeTools, CodeToolsStructs, NonPascalCodeTools, SourceChanger,
+  CodeToolManager,
   // IDEIntf,
   SrcEditorIntf, IDEExternToolIntf, IDEDialogs, IDEMsgIntf, PackageIntf,
   LazIDEIntf,
@@ -3824,7 +3825,7 @@ begin
                               [ccloDoNotAppendOutFileOption,ccloNoMacroParams]);
 
   try
-    XMLConfig:=TXMLConfig.CreateClean(MakefileCompiledFilename);
+    XMLConfig:=TXMLConfig.Create(MakefileCompiledFilename);
     try
       XMLConfig.SetValue('Makefile/Value',True);
       s:=OtherOptions;
@@ -3837,8 +3838,10 @@ begin
       s:=s+' '+CreateRelativePath(APackage.GetSrcFilename,APackage.Directory);
       //debugln(['TLazPackageGraph.WriteMakeFile IncPath="',IncPath,'" UnitPath="',UnitPath,'" Custom="',CustomOptions,'" Out="',UnitOutputPath,'"']);
       XMLConfig.SetValue('Params/Value',s);
-      InvalidateFileStateCache;
-      XMLConfig.Flush;
+      if XMLConfig.Modified then begin
+        InvalidateFileStateCache;
+        XMLConfig.Flush;
+      end;
     finally
       XMLConfig.Free;
     end;