diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/HTML.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 901575434..93f96b2f9 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -233,7 +233,8 @@ elementToHtml opts (Sec level num id' title' elements) = do then toHtmlFromList stuff else if writerSectionDivs opts then if writerHtml5 opts - then tag "section" << stuff + then tag "section" ! [prefixedId opts id'] + << stuff else thediv ! [prefixedId opts id'] << stuff else toHtmlFromList stuff |