with prev

PredictiveEcology · Sep 18, 2023 · 680f203 · 680f203
1 parent a3547e0
commit 680f203
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/utils_fireRegimePolys.R b/R/utils_fireRegimePolys.R
@@ -130,8 +130,7 @@ prepInputsFireRegimePolys <- function(url = NULL, destinationPath = tempdir(),
   } else if (grepl("^BEC.*ZONE", type)) {
     cols2keep <- c("ZONE", "SUBZONE")
   } else if (type == "BECNDT") {
-    cols2keep <- names(tmp)[names(tmp) %in%
-                              c("NTRL_DSTRD", "NTRLDSTRBN", "NATURAL_DISTURBANCE_TYPE_CODE")]
+    cols2keep <- names(tmp)[names(tmp) %in% "NATURAL_DISTURBANCE_TYPE_CODE"]
   } else if (type == "FRT") {
     cols2keep <- "Cluster"
   } else if (type == "FRU") {