IDE: codehelp: add line ends between fpdoc descriptions

git-svn-id: trunk@21287 -
This commit is contained in:
mattias 2009-08-18 16:57:03 +00:00
parent 3dcceaa569
commit 019ca2032a

View File

@ -2061,8 +2061,10 @@ var
if not IsHTML then begin
IsHTML:=true;
if HTMLHint<>'' then
HTMLHint:=TextToHTML(HTMLHint)+le+le;
HTMLHint:=TextToHTML(HTMLHint)+le;
end;
if HTMLHint<>'' then
HTMLHint:=HTMLHint+le;
HTMLHint:=HTMLHint+s;
end;
@ -2116,7 +2118,7 @@ begin
if Item.ElementNode<>nil then
begin
NodeValues:=Item.FPDocFile.GetValuesFromNode(Item.ElementNode);
{$ifdef VerboseHints}
{$ifdef VerboseHints}
for f:=Low(TFPDocItem) to High(TFPDocItem) do
DebugLn(['TCodeHelpManager.GetHint ',FPDocItemNames[f],' ',NodeValues[f]]);
{$endif}
@ -2173,9 +2175,9 @@ begin
if IsHTML then
HTMLHint:='<HTML><BODY>'+HTMLHint+'</BODY></HTML>';
end;
{$ifdef VerboseHints}
{ $ifdef VerboseHints}
DebugLn(['TCodeHelpManager.GetHint END Hint="',HTMLHint,'"']);
{$endif}
{ $endif}
end;
function TCodeHelpManager.CreateElement(Code: TCodeBuffer; X, Y: integer;