paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-02 06:39:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

LazUtils: formatting

Browse Source 
git-svn-id: trunk@48778 -
This commit is contained in:
juha 2015-04-19 15:31:01 +00:00
parent d2ddc67301
commit 25de80ed6c
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/lazutils/laz2_xmlcfg.pas
View File

@ -398,8 +398,7 @@ begin
SetFilename(Filename); // Load the XML config file
end;
function TXMLConfig.FindNode(const APath: String;
PathHasValue: boolean): TDomNode;
function TXMLConfig.FindNode(const APath: String; PathHasValue: boolean): TDomNode;
var
PathLen: Integer;
begin
@ -411,8 +410,7 @@ begin
Result:=InternalFindNode(APath,PathLen);
end;
function TXMLConfig.HasPath(const APath: string; PathHasValue: boolean
): boolean;
function TXMLConfig.HasPath(const APath: string; PathHasValue: boolean): boolean;
begin
Result:=FindNode(APath,PathHasValue)<>nil;
end;