From b84eed57bf77ee795e37f50431d4908a0584b57a Mon Sep 17 00:00:00 2001
From: jjallaire <jj@rstudio.com>
Date: Thu, 10 Aug 2017 21:19:42 -0400
Subject: [PATCH] shQuote arguments for pandoc self-contained

---
 src/cpp/session/modules/ModuleTools.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cpp/session/modules/ModuleTools.R b/src/cpp/session/modules/ModuleTools.R
index f3ffa52fec5..6090e073089 100644
--- a/src/cpp/session/modules/ModuleTools.R
+++ b/src/cpp/session/modules/ModuleTools.R
@@ -326,7 +326,7 @@
    
    # build the conversion command
    pandoc <- file.path(Sys.getenv("RSTUDIO_PANDOC"), "pandoc")
-   command <- paste(c(pandoc, args), collapse = " ")
+   command <- paste(shQuote(c(pandoc, args)), collapse = " ")
    
    # setwd temporarily
    wd <- getwd()