Correct error if not "reach" or "default"

This commit is contained in:
gnoblet 2023-02-19 22:30:00 -05:00
parent 5edf0c7700
commit 2fae078357

View file

@ -110,7 +110,7 @@ theme_reach <- function(
rlang::abort(
c(
paste0("There is no initiative '", initiative, " to be used with theme_reach()."),
"i" = paste0("initiative should be either 'reach', 'agora' or 'default'")
"i" = paste0("initiative should be either 'reach' or 'default'")
)
)