From 3c13e4853dad3babed3613765e764c959e420a04 Mon Sep 17 00:00:00 2001 From: gothub Date: Thu, 26 Oct 2017 11:42:33 -0700 Subject: [PATCH] use R platform independent temp directory --- src/main/resources/code/mdq-cache.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/main/resources/code/mdq-cache.R b/src/main/resources/code/mdq-cache.R index abf9daba..6fb9bcc6 100644 --- a/src/main/resources/code/mdq-cache.R +++ b/src/main/resources/code/mdq-cache.R @@ -19,7 +19,7 @@ library(httr) #' #' @examples get <- function(url) { - temp_dir = Sys.getenv("MDQE_CACHE_DIR", "~/tmp") + temp_dir = Sys.getenv("MDQE_CACHE_DIR", tempdir()) if (temp_dir == "") stop("MDQE_CACHE_DIR was not set.") if (!file.exists(temp_dir)) stop(paste0("MDQE_CACHE_DIR was set to a path that does not exist: ",