* try to resolve relative url first in current package before current module,

   solves bug #17146

git-svn-id: trunk@15768 -

utils/fpdoc/dglobals.pp

@@ -984,6 +984,10 @@ begin
     Result := FindAbsoluteLink(ALinkDest)
   else
   begin
+    Result := ResolveLink(AModule, amodule.packagename + '.' + ALinkDest);
+    if Length(Result) > 0 then
+      exit;
+
     Result := ResolveLink(AModule, AModule.PathName + '.' + ALinkDest);
     if Length(Result) > 0 then
       exit;