fix override of speciesTable

with PredictiveEcology/LandWeb#97
ianmseddy · Nov 14, 2018 · a13438b · a13438b
1 parent e891981
commit a13438b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Boreal_LBMRDataPrep.R b/Boreal_LBMRDataPrep.R
@@ -648,7 +648,7 @@ Save <- function(sim) {
 
 override.Boreal_LBMRDataPrep.inputObjects <- function(sim) {
   if (grepl("aspen80", P(sim)$runName)) {
-    speciesTable[LandisCode == "POPU.TRE", Longevity := 80] ## (see LandWeb#67)
+    sim$speciesTable[LandisCode == "POPU.TRE", Longevity := 80] ## (see LandWeb#67)
   }
   sim
 }