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

SynEdit: Fix exporting missing CodeStart tags when heoFragmentOnly in Options of TSynEditExporterHtml. Issue #0028733.

Browse Source 
git-svn-id: trunk@49874 -
This commit is contained in:
bart 2015-09-27 09:38:12 +00:00
parent df23bf086e
commit bce3f75f66
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/synexporthtml.pas
View File

@ -400,7 +400,9 @@ begin
else else
begin begin
if (heoWinClipHeader in fOptions) then if (heoWinClipHeader in fOptions) then
DocHeader := DocHeader + StartFragmentComment + CodeStart; DocHeader := DocHeader + StartFragmentComment + CodeStart
else
DocHeader := DocHeader + CodeStart;
end; end;
if fFontSize <> fsDefault then if fFontSize <> fsDefault then
sFontSize := Format(' size=%d', [1 + Ord(fFontSize)]) sFontSize := Format(' size=%d', [1 + Ord(fFontSize)])