* Fix so only interface is parsed

git-svn-id: trunk@15400 -
This commit is contained in:
michael 2010-06-10 06:52:07 +00:00
parent e1ea6de387
commit 20823eb4e4

View File

@ -546,6 +546,7 @@ begin
FRootLinkNode := TLinkNode.Create('', '');
FRootDocNode := TDocNode.Create('', nil);
HidePrivate := True;
InterfaceOnly:=True;
FPackages := TList.Create;
end;