commit 20e6c31767f8bf803b099750a939db9690e99b0b
author JJ Allaire <jj.allaire@gmail.com> Wed Jul 13 12:39:54 2016 -0400
committer GitHub <noreply@github.com> Wed Jul 13 12:39:54 2016 -0400
tree 8d319f5b68cdf62ace9d8f8a9c5e85e8c1f37d26
parent 5f51424cbbc8a60af0a7d87917cc636f90615b65
parent 30f9bc04ab7a1bb7ddc1fa6089ae8b71bc8d0ca9

Merge pull request #37 from BruceZhaoR/PR1

Standalone PR: fix revealjs-url bug in Windows

R/revealjs_presentation.R

diff --git a/R/revealjs_presentation.R b/R/revealjs_presentation.R
index 3778568..84de806 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"))