parameter_scan: fix overwriting of progerss variable

darksideoftheshmoo · Oct 14, 2024 · 20be3d0 · 20be3d0
1 parent 498c3da
commit 20be3d0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/cellid_parameter_scan.R b/R/cellid_parameter_scan.R
@@ -76,8 +76,8 @@ parameter_scan <- function(parameters.df,
     # Setup a progressbar and run CellID:
     ntasks <- length(test.params)
     pb <- txtProgressBar(max = ntasks, style = 3)
-    progress <- function(n) setTxtProgressBar(pb, n)
-    opts <- list(progress=progress)
+    progress_func <- function(n) setTxtProgressBar(pb, n)
+    opts <- list(progress=progress_func)
   } else {
     # Register a regular doParallel cluster
     doParallel::registerDoParallel(cl)