From 9182ce5df8f966e5a36147597ad16ac97bbc6b25 Mon Sep 17 00:00:00 2001 From: Matthew P Hamilton <30450935+matthewphamilton@users.noreply.github.com> Date: Tue, 12 Mar 2024 14:09:13 +1100 Subject: [PATCH] edited starter_sf typo --- R/mthd_renew.R | 2 +- data-raw/s4_fns/renew.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/R/mthd_renew.R b/R/mthd_renew.R index ca4b968..d630425 100644 --- a/R/mthd_renew.R +++ b/R/mthd_renew.R @@ -236,7 +236,7 @@ methods::setMethod("renew", "VicinityLookup", function (x, package_1L_chr = char country_chr = x@vicinity_raw_r3 %>% dplyr::pull(country_chr), area_type_chr = x@vicinity_raw_r3 %>% dplyr::pull(area_type_chr), area_bndy_yr_chr = x@vicinity_raw_r3 %>% dplyr::pull(area_bndy_yr_chr), - starter_sf = starter_sf_nm_1L_chr, subdivision_chr = x@vicinity_raw_r3 %>% + starter_sf_nm_chr = starter_sf_nm_1L_chr, subdivision_chr = x@vicinity_raw_r3 %>% dplyr::pull(uid_chr)) x <- renewSlot(x, "vicinity_templates_r3", starter_sf_lup_r3) } diff --git a/data-raw/s4_fns/renew.R b/data-raw/s4_fns/renew.R index 46f52e7..96ac7ef 100644 --- a/data-raw/s4_fns/renew.R +++ b/data-raw/s4_fns/renew.R @@ -113,7 +113,7 @@ renew_VicinityLookup <- function(x, country_chr = x@vicinity_raw_r3 %>% dplyr::pull(country_chr), area_type_chr = x@vicinity_raw_r3 %>% dplyr::pull(area_type_chr), area_bndy_yr_chr = x@vicinity_raw_r3 %>% dplyr::pull(area_bndy_yr_chr), - starter_sf = starter_sf_nm_1L_chr, + starter_sf_nm_chr = starter_sf_nm_1L_chr, subdivision_chr = x@vicinity_raw_r3 %>% dplyr::pull(uid_chr)) ## Assumes length one list x <- renewSlot(x, "vicinity_templates_r3",