* Fix so only interface is parsed

git-svn-id: trunk@15400 -

utils/fpdoc/dglobals.pp

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