paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-26 20:43:03 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Fixing result, no mode Delphi.

Browse Source 
git-svn-id: trunk@12056 -
This commit is contained in:
marco 2008-11-12 17:53:13 +00:00
parent 2a28ba151f
commit c665711b4a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/whtmlhlp.pas
View File

@ -1366,7 +1366,7 @@ end;
function TCustomHTMLHelpFile.FormatLink(const s:String):string;
begin
result:=formatpath(s);
formatlink:=formatpath(s);
end;
function TCustomHTMLHelpFile.GetTopicInfo(T: PTopic) : string;
@ -1608,7 +1608,7 @@ end;
function TCHMHelpFile.FormatLink(const s:String):string;
// do not reformat for chms, we assume them internally consistent.
begin
result:=s;
formatlink:=s;
end;
function TChmHelpFile.SearchTopic(HelpCtx: THelpCtx): PTopic;