mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-13 12:39:09 +02:00
* def.fullownerhierarchyname() already ends in a '.', so don't append another
one git-svn-id: trunk@32783 -
This commit is contained in:
parent
4643913d58
commit
015a864db1
@ -129,7 +129,7 @@ implementation
|
|||||||
begin
|
begin
|
||||||
if not assigned(def.typesym) then
|
if not assigned(def.typesym) then
|
||||||
internalerror(2015041901);
|
internalerror(2015041901);
|
||||||
result:='%"typ.'+def.fullownerhierarchyname+'.'+def.typesym.realname+'"'
|
result:='%"typ.'+def.fullownerhierarchyname+def.typesym.realname+'"'
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user