diff --git a/utils/fpdoc/dw_html.pp b/utils/fpdoc/dw_html.pp index 1b26327dfc..ead1bc2ff6 100644 --- a/utils/fpdoc/dw_html.pp +++ b/utils/fpdoc/dw_html.pp @@ -1686,7 +1686,7 @@ Procedure THTMLWriter.AppendSeeAlsoSection(AElement : TPasElement;DocNode : TDoc var Node: TDOMNode; TableEl, El, TREl, TDEl, ParaEl, NewEl, DescrEl: TDOMElement; - s: String; + l,s: String; f: Text; IsFirstSeeAlso : Boolean; @@ -1708,16 +1708,18 @@ begin El:=TDOMElement(Node); TREl:=CreateTR(TableEl); ParaEl:=CreatePara(CreateTD_vtop(TREl)); - s:= ResolveLinkID(El['id']); + l:=El['id']; + s:= ResolveLinkID(l); if Length(s)=0 then begin - WriteLn(Format(SErrUnknownLinkID, [El['id']])); + WriteLn(Format(SErrUnknownLinkID, [l])); NewEl := CreateEl(ParaEl,'b') end else NewEl := CreateLink(ParaEl,s); AppendText(NewEl,El['id']); - DescrEl := Engine.FindShortDescr(AElement.GetModule, El['id']); + l:=El['id']; + DescrEl := Engine.FindShortDescr(AElement.GetModule,L); if Assigned(DescrEl) then begin AppendNbSp(CreatePara(CreateTD(TREl)), 2); @@ -2802,7 +2804,10 @@ end. { $Log$ - Revision 1.8 2004-08-28 18:04:49 michael + Revision 1.9 2004-08-31 09:40:05 michael + + Lookup using string, not widestring + + Revision 1.8 2004/08/28 18:04:49 michael + Added context to topic pages Revision 1.7 2004/07/25 22:40:13 michael