summaryrefslogtreecommitdiff
path: root/src/pandoc.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/pandoc.hs')
-rw-r--r--src/pandoc.hs12
1 files changed, 7 insertions, 5 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs
index 27bc2c25c..9298b3207 100644
--- a/src/pandoc.hs
+++ b/src/pandoc.hs
@@ -737,6 +737,7 @@ main = do
Nothing -> error ("Unknown reader: " ++ readerName')
templ <- case templatePath of
+ _ | not standalone -> return ""
Nothing -> do
deftemp <- getDefaultTemplate datadir writerName'
case deftemp of
@@ -790,9 +791,10 @@ main = do
else takeDirectory (head sources)
let slideVariant = case writerName' of
- "s5" -> S5Slides
- "slidy" -> SlidySlides
- _ -> NoSlides
+ "s5" -> S5Slides
+ "slidy" -> SlidySlides
+ "dzslides" -> DZSlides
+ _ -> NoSlides
let startParserState =
defaultParserState { stateParseRaw = parseRaw,
@@ -836,8 +838,8 @@ main = do
writerIdentifierPrefix = idPrefix,
writerSourceDirectory = sourceDir,
writerUserDataDir = datadir,
- writerHtml5 = html5 &&
- "html" `isPrefixOf` writerName',
+ writerHtml5 = html5 ||
+ slideVariant == DZSlides,
writerChapters = chapters,
writerListings = listings,
writerAscii = ascii }