modelsummary's coef_rename doesn't work with avg_comparisons

Fixes #1238

Author: strengejacke

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: parameters
 Title: Processing of Model Parameters
-Version: 0.29.2.1
+Version: 0.29.2.2
 Authors@R:
     c(person(given = "Daniel",
              family = "Lüdecke",

R/format_parameters.R

@@ -440,7 +440,7 @@ format_parameters.parameters_model <- function(model, ...) {
   }
 
   # validation check
-  if (!is.null(model) && insight::is_regression_model(model) && !is.data.frame(model)) {
+  if (.is_valid_model_input(model)) {
     # get data, but exclude response - we have no need for that label
     mf <- insight::get_data(model, source = "mf", verbose = FALSE)
     # sanity check - any labels (value labels)?
@@ -601,6 +601,13 @@ format_parameters.parameters_model <- function(model, ...) {
 
 # helper -------------------
 
+.is_valid_model_input <- function(model) {
+  !is.null(model) &&
+    ((insight::is_regression_model(model) && !is.data.frame(model)) ||
+      inherits(model, c("predictions", "comparisons", "slopes")))
+}
+
+
 .unicode_symbols <- function() {
   # symbols only work on windows from R 4.2 and higher
   win_os <- tryCatch(