diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2013-03-23 21:46:27 -0400 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2013-03-23 21:48:34 -0400 |
| commit | da1e38893a1d3ec336e9c3244959396dd27a9d6e (patch) | |
| tree | fb99e2d291777bcf3a9c5e2971a5cadd03584184 /src/Text | |
| parent | 388acaa5f100d4df91e7014705770091410dcf23 (diff) | |
| download | pandoc-da1e38893a1d3ec336e9c3244959396dd27a9d6e.tar.gz | |
Reveal.js improvements.
Changed name to revealjs (from reveal_js).
Set revealjs-url template variable to 'reveal.js' by default.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc.hs | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Slides.hs | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 1 |
3 files changed, 3 insertions, 2 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index 7e9932c1b..89faf140c 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -231,7 +231,7 @@ writers = [ ,("dzslides" , PureStringWriter $ \o -> writeHtmlString o{ writerSlideVariant = DZSlides , writerHtml5 = True }) - ,("reveal_js" , PureStringWriter $ \o -> + ,("revealjs" , PureStringWriter $ \o -> writeHtmlString o{ writerSlideVariant = RevealJsSlides , writerHtml5 = True }) ,("docbook" , PureStringWriter writeDocbook) diff --git a/src/Text/Pandoc/Slides.hs b/src/Text/Pandoc/Slides.hs index 09d356a4a..2bbdb120f 100644 --- a/src/Text/Pandoc/Slides.hs +++ b/src/Text/Pandoc/Slides.hs @@ -26,7 +26,7 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Portability : portable Utility functions for splitting documents into slides for slide -show formats (dzslides, reveal_js, s5, slidy, slideous, beamer). +show formats (dzslides, revealjs, s5, slidy, slideous, beamer). -} module Text.Pandoc.Slides ( getSlideLevel, prepSlides ) where import Text.Pandoc.Definition diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 8957e709f..108d5450c 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -208,6 +208,7 @@ inTemplate opts tit auths authsMeta date toc body' newvars = , ("idprefix", writerIdentifierPrefix opts) , ("slidy-url", "http://www.w3.org/Talks/Tools/Slidy2") , ("slideous-url", "slideous") + , ("revealjs-url", "reveal.js") , ("s5-url", "s5/default") ] ++ [ ("html5","true") | writerHtml5 opts ] ++ (case toc of |