paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-26 14:37:24 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug #24271, fpdoc failing on dotted unit names

Browse Source 
git-svn-id: trunk@30624 -
This commit is contained in:
michael 2015-04-17 18:23:13 +00:00
parent f3e8240230
commit faaae8b2a2
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
utils/fpdoc/dglobals.pp
View File

@ -475,9 +475,6 @@ begin
LastChild := Child; LastChild := Child;
Child := Child.NextSibling; Child := Child.NextSibling;
end; end;
{ No child found, let's create one if we are at the end of the path }
if DotPos > 0 then
Raise Exception.CreateFmt('Link path does not exist: %s',[APathName]);
Result := TLinkNode.Create(ChildName, ALinkTo); Result := TLinkNode.Create(ChildName, ALinkTo);
if Assigned(LastChild) then if Assigned(LastChild) then
LastChild.FNextSibling := Result LastChild.FNextSibling := Result