paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 19:58:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

DocEditor: Keep contents of SeeAlso section when saving the description file. Issue #34631, patch from Oleg.

Browse Source 
git-svn-id: trunk@60823 -
This commit is contained in:
juha 2019-04-02 23:14:44 +00:00
parent 67258421da
commit 979beb76a8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
doceditor/freditor.pp
View File

@ -431,7 +431,7 @@ Function TElementEditor.CurrentXML : String;
Var
I : Integer;
S,L,LT : String;
S,L,LT,T : String;
begin
Result:='';
@ -446,9 +446,9 @@ begin
LT:=Trim(lbxSeeAlso.Items[i]);
if (LT<>'') then
begin
SplitLinkText(LT,L,LT);
If (LT<>'') then
S:=S+'<link id="'+L+'">'+LT+'</link>'
SplitLinkText(LT,L,T);
If (T<>'') then
S:=S+'<link id="'+L+'">'+T+'</link>'
else
S:=S+'<link id="'+L+'"/>';
end;