paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 20:39:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Add '.' to tooltip help if missing. Issue #39004, patch by CudaText man.

Browse Source 
git-svn-id: trunk@65252 -
This commit is contained in:
juha 2021-06-16 21:38:38 +00:00
parent a312cf8723
commit caf1ee88ad
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/codehelp.pas
View File

@ -2939,7 +2939,14 @@ function TCodeHelpManager.GetFPDocNodeAsHTML(FPDocFile: TLazFPDocFile;
if Node.NodeName='errors' then if Node.NodeName='errors' then
Result:=Result+'<div class="title">'+'Errors'+'</div>' Result:=Result+'<div class="title">'+'Errors'+'</div>'
else if Node.NodeName='seealso' then else if Node.NodeName='seealso' then
Result:=Result+'<div class="title">'+'See also'+'</div>'; Result:=Result+'<div class="title">'+'See also'+'</div>'
else if Node.NodeName='short' then
begin
//fix Mantis issue #39004
s:=Trim(s);
if (s<>'') and (s[Length(s)]<>'.') then
s:=s+'.';
end;
Result:=Result+'<div class="'+Node.NodeName+'">'+s+'</div>'+LineEnding; Result:=Result+'<div class="'+Node.NodeName+'">'+s+'</div>'+LineEnding;
end else end else
if (Node.NodeName='p') if (Node.NodeName='p')