paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-20 10:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* make interfaces clickable.

Browse Source 
git-svn-id: trunk@15796 -
This commit is contained in:
marco 2010-08-13 12:29:27 +00:00
parent 0ca9fb281d
commit 2518a87deb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utils/fpdoc/dw_html.pp
View File

@ -2852,7 +2852,7 @@ var
for i:=0 to AClass.interfaces.count-1 do for i:=0 to AClass.interfaces.count-1 do
begin begin
AppendSym(CodeEl, ','); AppendSym(CodeEl, ',');
AppendText(CodeEl,TPasClassType(AClass.Interfaces[i]).Name); AppendHyperlink(CodeEl,TPasClassType(AClass.Interfaces[i]));
end; end;
end; end;
AppendSym(CodeEl, ')'); AppendSym(CodeEl, ')');