Reveal.js improvements.

Changed name to revealjs (from reveal_js). Set revealjs-url template variable to 'reveal.js' by default.
jgm · Mar 24, 2013 · da1e388 · da1e388
1 parent 388acaa
commit da1e388
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 3 deletions.
diff --git a/pandoc.hs b/pandoc.hs
@@ -1113,7 +1113,7 @@ main = do
                       >>= writerFn outputFile . handleEntities
           where htmlFormat = writerName' `elem`
                                ["html","html+lhs","html5","html5+lhs",
-                               "s5","slidy","slideous","dzslides","reveal_js"]
+                               "s5","slidy","slideous","dzslides","revealjs"]
                 selfcontain = if selfContained && htmlFormat
                                  then makeSelfContained datadir
                                  else return

diff --git 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
@@ -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
@@ -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