use format_alerts

easystats · Apr 25, 2024 · 8d9d366 · 8d9d366
1 parent 2269146
commit 8d9d366
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/get_marginalmeans.R b/R/get_marginalmeans.R
@@ -74,9 +74,9 @@
     # Find categorical predictors
     at <- predictors[!vapply(data[predictors], is.numeric, logical(1))]
     if (!length(at) || all(is.na(at))) {
-      stop("Model contains no categorical factor. Please specify 'at'.", call. = FALSE)
+      insight::format_error("Model contains no categorical factor. Please specify 'at'.")
     }
-    message("We selected `at = c(", toString(paste0('"', at, '"')), ")`.")
+    insight::format_alert("We selected `at = c(", toString(paste0('"', at, '"')), ")`.")
   }
 
   list(at = at)