diff --git a/Boreal_LBMRDataPrep.R b/Boreal_LBMRDataPrep.R
index 6a82111..5b08437 100644
--- 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
 }