Merge pull request PecanProject#3932 from shreyannandanwar/fix/run-input-typo-clean

fix: correct run$input → run$inputs typo across 4 files

Author: mdietze

base/workflow/R/do_conversions.R

@@ -28,7 +28,7 @@ do_conversions <- function(settings, overwrite.met = FALSE, overwrite.fia = FALS
       next
     }
 
-    input.tag <- names(settings$run$input)[i]
+    input.tag <- names(settings$run$inputs)[i]
     PEcAn.logger::logger.info("PROCESSING: ",input.tag)
 
     # Check for existing file paths , skips if the file exists

modules/data.land/R/soil_process.R

@@ -62,10 +62,10 @@ soil_process <- function(settings, input, dbfiles, overwrite = FALSE, run.local
 
     if (length(newfile) == 0) {
       # No files exist yet — extract from gSSURGO
-      radius <- ifelse(is.null(settings$run$input$soil$radius), 100,
-                       as.numeric(settings$run$input$soil$radius))
-      grid_size <- max(3, ifelse(is.null(settings$run$input$soil$grid_size), 3,
-                                 as.numeric(settings$run$input$soil$grid_size)))
+      radius <- ifelse(is.null(settings$run$inputs$soil$radius), 100,
+                       as.numeric(settings$run$inputs$soil$radius))
+      grid_size <- max(3, ifelse(is.null(settings$run$inputs$soil$grid_size), 3,
+                                 as.numeric(settings$run$inputs$soil$grid_size)))
 
       grid_extent  <- radius * sqrt(pi)
       grid_spacing <- grid_extent / (grid_size - 1)

scripts/workflow.bm.R

@@ -100,7 +100,7 @@ for (i in seq_along(settings$run$inputs)) {
     next
   }
 
-  input.tag <- names(settings$run$input)[i]
+  input.tag <- names(settings$run$inputs)[i]
 
   # fia database
   if ((input["input"] == "fia") && (status.check("FIA2ED") == 0)) {

scripts/workflow.pda.R

@@ -63,7 +63,7 @@ if (length(which(commandArgs() == "--continue")) == 0) {
       next
     }
 
-    input.tag <- names(settings$run$input)[i]
+    input.tag <- names(settings$run$inputs)[i]
 
     # fia database
     if (input["input"] == "fia") {