pandoc: Treat html5+lhs as an html format.

This commit is contained in:
John MacFarlane
2012-02-05 09:58:16 -08:00
parent f97391c7de
commit ce9f5f36c8
+2 -1
View File
@@ -1041,7 +1041,8 @@ main = do
Left err' -> err 43 $ toString err'
Just r -> writerFn outputFile =<< postProcess result
where result = r writerOptions doc2 ++ ['\n' | not standalone']
htmlFormats = ["html","html+lhs","s5","slidy","dzslides"]
htmlFormats = ["html","html+lhs","html5","html5+lhs",
"s5","slidy","dzslides"]
postProcess = if selfContained && writerName' `elem` htmlFormats
then makeSelfContained datadir
else return