From a32160131b97ba55f26a90891f05bd896ae9325a Mon Sep 17 00:00:00 2001 From: michael Date: Sun, 26 Jul 2015 08:11:06 +0000 Subject: [PATCH] * Add backwards compatibility lookup for operators git-svn-id: trunk@31233 - --- utils/fpdoc/dglobals.pp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/utils/fpdoc/dglobals.pp b/utils/fpdoc/dglobals.pp index 912ff6f892..5884bda9f1 100644 --- a/utils/fpdoc/dglobals.pp +++ b/utils/fpdoc/dglobals.pp @@ -1514,7 +1514,11 @@ begin if AElement.InheritsFrom(TPasUnresolvedTypeRef) then Result := FindDocNode(AElement.GetModule, AElement.Name) else + begin Result := RootDocNode.FindChild(AElement.PathName); + if (Result=Nil) and (AElement is TPasoperator) then + Result:=RootDocNode.FindChild(TPasOperator(AElement).OldName(True)); + end; if (Result=Nil) and WarnNoNode and (Length(AElement.PathName)>0) and