diff options
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/S5.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/Text/Pandoc/S5.hs b/src/Text/Pandoc/S5.hs index 9aa643e7a..52428356e 100644 --- a/src/Text/Pandoc/S5.hs +++ b/src/Text/Pandoc/S5.hs @@ -43,10 +43,8 @@ inCDATA s = "/*<![CDATA[*/\n" ++ s ++ "\n/*]]>*/\n" s5Javascript :: Maybe FilePath -> IO String s5Javascript datadir = do - jsCom <- readDataFile datadir $ "s5" </> "default" </> "slides.js.comment" - jsPacked <- readDataFile datadir $ "s5" </> "default" </> "slides.js.packed" - return $ "<script type=\"text/javascript\">\n" ++ - inCDATA (jsCom ++ jsPacked) ++ "</script>\n" + js <- readDataFile datadir $ "s5" </> "default" </> "slides.min.js" + return $ "<script type=\"text/javascript\">\n" ++ inCDATA js ++ "</script>\n" s5CSS :: Maybe FilePath -> IO String s5CSS datadir = do |