commit ee8ed98bc77b0f8ca666e1975ef88531e61bae05
author JJ Allaire <jj.allaire@gmail.com> Wed Jul 13 15:02:34 2016 -0400
committer GitHub <noreply@github.com> Wed Jul 13 15:02:34 2016 -0400
tree a0ff16a2ea691774b8657bf90295478b2167b21e
parent eea3bca7849aab9be3f64034f517c2b19063e65f
parent 3c3d67dfa207057d5f248a979bdb650cee97ef7a

Merge pull request #36 from BruceZhaoR/revealjs-3.3.0

Standalone PR: upgrade to reveal.js-3.3.0

R/revealjs_presentation.R

diff --git a/R/revealjs_presentation.R b/R/revealjs_presentation.R
index e27cb1c..99174c7 100644
--- a/R/revealjs_presentation.R
+++ b/R/revealjs_presentation.R
@@ -196,8 +196,9 @@
     if (!self_contained || identical(.Platform$OS.type, "windows"))
       revealjs_path <- relative_to(
         output_dir, render_supporting_files(revealjs_path, lib_dir))
-    args <- c(args, "--variable", paste("revealjs-url=",
-                                        pandoc_path_arg(revealjs_path), sep=""))
+    else 
+      revealjs_path <- pandoc_path_arg(revealjs_path)
+    args <- c(args, "--variable", paste0("revealjs-url=", revealjs_path))
     
     # highlight
     args <- c(args, pandoc_highlight_args(highlight, default = "pygments"))