mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: XMLConfig - preserve white space

Browse source 
(cherry picked from commit fe39bff758)
This commit is contained in:
Alexander Koblov 2021-12-05 13:28:02 +03:00
commit b1a12d5bd3
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
components/doublecmd/dcxmlconfig.pas
View file

@ -525,7 +525,7 @@ begin
try
if FileStream.Size = 0 then
raise EXmlConfigEmpty.Create('');
ReadXMLFile(TmpDoc, FileStream, FilenameToURI(AFilename));
ReadXMLFile(TmpDoc, FileStream, FilenameToURI(AFilename), [xrfPreserveWhiteSpace]);
if TmpDoc.DocumentElement.NodeName <> ApplicationName then
raise EXMLReadError.Create('Root element is not <' + ApplicationName + '>.');
FDoc.Free;
@ -541,7 +541,7 @@ var
begin
if AStream.Size = 0 then
raise EXmlConfigEmpty.Create('');
ReadXMLFile(TmpDoc, AStream);
ReadXMLFile(TmpDoc, AStream, [xrfPreserveWhiteSpace]);
FDoc.Free;
FDoc := TmpDoc;
end;