mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 03:29:33 +02:00
* another minor problem found with -CR
git-svn-id: trunk@23765 -
This commit is contained in:
parent
cb55b2d2cf
commit
fc02f5c7f7
@ -341,7 +341,7 @@ begin
|
|||||||
begin
|
begin
|
||||||
ParentElement := TPasProcedureType(AModule.InterfaceSection.Functions[j]);
|
ParentElement := TPasProcedureType(AModule.InterfaceSection.Functions[j]);
|
||||||
TmpItem := Index.Items.NewItem;
|
TmpItem := Index.Items.NewItem;
|
||||||
TmpItem.Text := ParentElement.Name + ' ' + TPasFunction(ParentElement).ElementTypeName;
|
TmpItem.Text := ParentElement.Name + ' ' + ParentElement.ElementTypeName;
|
||||||
TmpItem.Local := FixHTMLpath(Allocator.GetFilename(ParentElement, 0));
|
TmpItem.Local := FixHTMLpath(Allocator.GetFilename(ParentElement, 0));
|
||||||
end;
|
end;
|
||||||
// consts
|
// consts
|
||||||
|
Loading…
Reference in New Issue
Block a user