use inputPath instead of dataPath per latest best practices

PredictiveEcology · Apr 19, 2024 · 7c84846 · 7c84846
1 parent df983f2
commit 7c84846
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Biomass_core.R b/Biomass_core.R
@@ -1975,7 +1975,7 @@ CohortAgeReclassification <- function(sim) {
 ## .inputObjects ------------------------------------------------------------------------------
 .inputObjects <- compiler::cmpfun(function(sim) {
   cacheTags <- c(currentModule(sim), "otherFunctions:.inputObjects")
-  dPath <- asPath(getOption("reproducible.destinationPath", dataPath(sim)), 1)
+  dPath <- asPath(inputPath(sim), 1)
   if (getOption("LandR.verbose", TRUE) > 0)
     message(currentModule(sim), ": using dataPath '", dPath, "'.")