minor cleaning

paul-buerkner · Feb 13, 2023 · d3f8a54 · d3f8a54
1 parent 7f08ea1
commit d3f8a54
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/projpred.R b/R/projpred.R
@@ -94,7 +94,8 @@ get_refmodel.brmsfit <- function(object, newdata = NULL, resp = NULL,
   bterms <- brmsterms(formula)
   if (length(bterms$dpars) > 1L && !conv_cats_dpars(family)) {
     stop2("Projpred does not support distributional models.")
-  } else if (conv_cats_dpars(family) && length(formula$pforms)) {
+  }
+  if (conv_cats_dpars(family) && length(formula$pforms)) {
     stop2("Projpred does not support category-specific formulas.")
   }
   if (length(bterms$nlpars) > 0L) {