aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/DefaultHeaders.hs
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-12-31 01:08:46 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-12-31 01:08:46 +0000
commit26ce0d04ec461f10c92597bb054763b3820a125a (patch)
tree4facdf98a2aa2fdf21f2bbd3c6109a17bfa4ae63 /src/Text/Pandoc/DefaultHeaders.hs
parenta42bae619a222de6b138b590c4d010ab15532d26 (diff)
downloadpandoc-26ce0d04ec461f10c92597bb054763b3820a125a.tar.gz
Fixed S5.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1674 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/DefaultHeaders.hs')
-rw-r--r--src/Text/Pandoc/DefaultHeaders.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/DefaultHeaders.hs b/src/Text/Pandoc/DefaultHeaders.hs
index e9c1f17e5..27fb237c5 100644
--- a/src/Text/Pandoc/DefaultHeaders.hs
+++ b/src/Text/Pandoc/DefaultHeaders.hs
@@ -37,6 +37,7 @@ module Text.Pandoc.DefaultHeaders (
defaultRTFHeader
) where
import Text.Pandoc.Writers.S5
+import Text.Pandoc.Shared
import System.FilePath ( (</>) )
import Text.Pandoc.TH ( contentsOf )
@@ -61,7 +62,7 @@ defaultOpenDocumentHeader = $(contentsOf $ "data" </> "headers" </> "OpenDocume
#endif
defaultS5Header :: String
-defaultS5Header = s5Meta ++ s5CSS ++ s5Javascript
+defaultS5Header = substitute "$" "$$" $ s5Meta ++ s5CSS ++ s5Javascript
defaultRTFHeader :: String
#ifndef __HADDOCK__