paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 18:09:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazutils: TXMLConfig.Flush: use WriteXMLFile to allow overriding

Browse Source 
git-svn-id: trunk@35943 -
This commit is contained in:
mattias 2012-03-13 22:18:38 +00:00
parent 213f110c4c
commit 9a4216f43e
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/lazutils/laz2_xmlcfg.pas
View File

@ -185,8 +185,7 @@ begin
if Modified and (Filename<>'') then if Modified and (Filename<>'') then
begin begin
//DebugLn(['TXMLConfig.Flush ',Filename]); //DebugLn(['TXMLConfig.Flush ',Filename]);
Laz2_XMLWrite.WriteXMLFile(Doc,Filename,WriteFlags); WriteXMLFile(Doc,Filename);
InvalidateFileStateCache;
FModified := False; FModified := False;
end; end;
end; end;