diff --git a/R/theme_reach.R b/R/theme_reach.R
index a580047..b096749 100644
--- a/R/theme_reach.R
+++ b/R/theme_reach.R
@@ -107,7 +107,7 @@ theme_reach <- function(
   # - add facet theming
 
   if (!initiative %in% c("reach", "default"))
-    rlang::stop(
+    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'")