aboutsummaryrefslogtreecommitdiff
path: root/src/pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2010-07-22 22:23:30 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2010-07-22 22:23:43 -0700
commitda52412455707656e7738d110c32be2decee2dcd (patch)
tree13c3515ba34eff5b09ebcd269d436ee2efef7a6c /src/pandoc.hs
parentc5ed016616e1e6fef1801c98ef61a5eae6a3af55 (diff)
downloadpandoc-da52412455707656e7738d110c32be2decee2dcd.tar.gz
Extended --offline to s5.
S5 default is now to include links, rather than a full copy of scripts and stylesheets.
Diffstat (limited to 'src/pandoc.hs')
-rw-r--r--src/pandoc.hs5
1 files changed, 4 insertions, 1 deletions
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"