From da52412455707656e7738d110c32be2decee2dcd Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 22 Jul 2010 22:23:30 -0700 Subject: Extended --offline to s5. S5 default is now to include links, rather than a full copy of scripts and stylesheets. --- src/pandoc.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/pandoc.hs') diff --git a/src/pandoc.hs b/src/pandoc.hs index cb1756ffb..b7ff42803 100644 --- a/src/pandoc.hs +++ b/src/pandoc.hs @@ -30,7 +30,7 @@ writers. -} module Main where import Text.Pandoc -import Text.Pandoc.Writers.S5 (s5HeaderIncludes) +import Text.Pandoc.Writers.S5 (s5HeaderIncludes, s5Links, s5Meta) import Text.Pandoc.Shared ( tabFilter, ObfuscationMethod (..), readDataFile, headerShift ) #ifdef _HIGHLIGHTING @@ -747,6 +747,9 @@ main = do ("s5", True, True) -> do inc <- s5HeaderIncludes datadir return $ ("header-includes", inc) : variables + ("s5", True, False) -> + return $ ("header-includes", s5Meta ++ s5Links) : + variables ("slidy", True, True) -> do slidyJs <- readDataFile datadir $ "slidy" "slidy.min.js" -- cgit v1.2.3