Use fork-policy to manage what to fork (and not)

beauchamplab · Aug 15, 2024 · 2d5d9dc · 2d5d9dc
1 parent f1e5fa9
commit 2d5d9dc
Show file tree

Hide file tree

Showing 17 changed files with 917 additions and 892 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: raveio
 Type: Package
 Title: File-System Toolbox for RAVE Project
-Version: 0.9.0.61
+Version: 0.9.0.62
 Language: en-US
 Authors@R: c(
     person("Zhengjia", "Wang", email = "dipterix.wang@gmail.com", role = c("aut", "cre", "cph")),

diff --git a/NAMESPACE b/NAMESPACE
@@ -114,7 +114,6 @@ export(as_rave_project)
 export(as_rave_subject)
 export(as_rave_unit)
 export(as_yael_process)
-export(auto_process_blackrock)
 export(backup_file)
 export(cache_root)
 export(cache_to_filearray)

diff --git a/R/class-pipeline_tools.R b/R/class-pipeline_tools.R
@@ -415,13 +415,15 @@ PipelineTools <- R6::R6Class(
 
     #' @description fork (copy) the current pipeline to a new directory
     #' @param path path to the new pipeline, a folder will be created there
-    #' @param filter_pattern file pattern to copy
+    #' @param policy fork policy defined by module author, see text file
+    #' 'fork-policy' under the pipeline directory; if missing, then default to
+    #' avoid copying \code{main.html} and \code{shared} folder
     #' @returns A new pipeline object based on the path given
-    fork = function(path, filter_pattern = PIPELINE_FORK_PATTERN) {
+    fork = function(path, policy = "default") {
       pipeline_fork(
         src = self$pipeline_path,
         dest = path,
-        filter_pattern = filter_pattern,
+        policy = policy,
         activate = FALSE
       )
       pipeline(