enable PUMAs for 2023 5-year ACS

R/pums.R

@@ -97,9 +97,9 @@ get_pums <- function(variables = NULL,
   key <- get_census_api_key(key)
 
   # Account for missing PUMAs in 2008-2012 through 2011-2015 ACS samples
-  if (year %in% c(2012:2015, 2022:2023) && survey == "acs5" && (!is.null(puma) || "PUMA" %in% variables)) {
+  if (year %in% c(2012:2015, 2022) && survey == "acs5" && (!is.null(puma) || "PUMA" %in% variables)) {
     rlang::abort(message = c(
-      "PUMAs are not available for the 5-year ACS with end-years between 2012 and 2015, and 2022-2023, due to inconsistent PUMA boundary definitions.",
+      "PUMAs are not available for the 5-year ACS with end-years between 2012 and 2015, and 2022, due to inconsistent PUMA boundary definitions.",
       i = "Users can use the `PUMA00`, `PUMA10`, and `PUMA20` variables for year-specific PUMAs in these datasets.",
       i = "See https://github.com/walkerke/tidycensus/issues/555 for discussion."
     ))