git.iko.soy/typeable/pandoc
on master help sign in
In HTML writer, include <title></title> even if title is null.
6411ea7fiddlosopher
src/Text/Pandoc/Writers/HTML.hs+1−4
compare with master
unifiedsplit
@@ -90,10 +90,7 @@ attributeStringToHtml = gsub "\"" "&quot;"
90-- | Returns an HTML header with appropriate bibliographic information.
90-- | Returns an HTML header with appropriate bibliographic information.
91htmlHeader :: WriterOptions -> Meta -> String
91htmlHeader :: WriterOptions -> Meta -> String
92htmlHeader options (Meta title authors date) =
92htmlHeader options (Meta title authors date) =
93− let titletext = if (null title) then
94− ""
95− else
96− "<title>" ++ (inlineListToHtml options title) ++ "</title>\n"
93+ let titletext = "<title>" ++ (inlineListToHtml options title) ++ "</title>\n"
97 authortext = if (null authors) then
94 authortext = if (null authors) then
98 ""
95 ""
99 else
96 else