From d5e0c449bde0822d9210dd6a10ceb617d3da4f67 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 24 Jul 2011 09:27:08 -0700
Subject: Use yuicompressor-packed js for s5.

Removed s5/default/slides.js.comment,
s5/default/slides.js.packed. Added s5/default/slides.min.js.
---
 src/Text/Pandoc/S5.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'src/Text/Pandoc')

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
-- 
cgit v1.2.3