set kill=FALSE as default in InitCluster

rpkgs · Mar 5, 2022 · cb529d9 · cb529d9
1 parent 709da45
commit cb529d9
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/NEWS.md b/NEWS.md
@@ -2,6 +2,7 @@
 # Ipaper 0.1.9
 
 - fix `cdo_grid` corner coordinate error.
+- set `kill=FALSE` as default in `InitCluster`
 
 # Ipaper 0.1.7
 

diff --git a/R/parallel_init.R b/R/parallel_init.R
@@ -14,7 +14,7 @@ killCluster <- function(){
 #' @importFrom doParallel registerDoParallel
 #' @importFrom parallel makeCluster
 #' @export
-InitCluster <- function (ncluster = 4, outfile = "log.txt", FORK = TRUE, kill = TRUE) 
+InitCluster <- function (ncluster = 4, outfile = "log.txt", FORK = TRUE, kill = FALSE) 
 {
     if (kill) killCluster()
     if (file.exists(outfile)) file.remove(outfile)