fix #514

walkerke · Apr 22, 2023 · 9e76bf4 · 9e76bf4
1 parent 39ffbb3
commit 9e76bf4
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 11 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -6,7 +6,7 @@ Authors@R: c(
     person(given = "Kyle", family = "Walker", email="kyle@walker-data.com", role=c("aut", "cre")),
     person(given = "Matt", family = "Herman", email = "mfherman@gmail.com", role = "aut"),
     person(given = "Kris", family = "Eberwein", email = "eberwein@knights.ucf.edu", role = "ctb"))
-Date: 2023-04-06
+Date: 2023-04-22
 URL: https://walker-data.com/tidycensus/
 BugReports: https://github.com/walkerke/tidycensus/issues
 Description: An integrated R interface to several United States Census Bureau 

diff --git a/R/acs.R b/R/acs.R
@@ -188,17 +188,9 @@ get_acs <- function(geography, variables = NULL, table = NULL, cache_table = FAL
          call. = FALSE)
   }
 
-  # Handle new definition of MSAs for 2021 and later (5-year ACS only)
+  # CBSA alias (fixes #514 by reverting back)
   if (geography == "cbsa") {
-    if (year > 2020 && survey == "acs5") {
-      geography <- "metropolitan/micropolitan statistical area"
-    } else {
-      geography <- "metropolitan statistical area/micropolitan statistical area"
-    }
-  }
-
-  if (geography == "metropolitan statistical area/micropolitan statistical area" && year >= 2021 && survey == "acs5") {
-    geography <- "metropolitan/micropolitan statistical area"
+    geography <- "metropolitan statistical area/micropolitan statistical area"
   }
 
   # Other aliases