commit 4609b6c7d483db3ee1d929baa3c73f582f5c58ce
author Bruce's Thinkpad <brucezhaor2016@gmail.com> Wed Jul 13 22:24:33 2016 +0800
committer Bruce's Thinkpad <brucezhaor2016@gmail.com> Wed Jul 13 22:24:33 2016 +0800
tree dcf2b964d21039a6de8d528af93109576d5e0fb9
parent 5f51424cbbc8a60af0a7d87917cc636f90615b65

Standalone PR for fixing the revealjs-url bug in Windows

R/revealjs_presentation.R

diff --git a/R/revealjs_presentation.R b/R/revealjs_presentation.R
index 3778568..9e5e3e6 100644
--- a/R/revealjs_presentation.R
+++ b/R/revealjs_presentation.R
@@ -196,8 +196,7 @@
     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=""))
+    args <- c(args, "--variable", paste0("revealjs-url=", revealjs_path)))
     
     # highlight
     args <- c(args, pandoc_highlight_args(highlight, default = "pygments"))