Misleading documentation for `pool_parameters()`?

[biegt]

In the documentation of pool_parameters() it says for the argument x:

"A list of parameters_model objects, as returned by model_parameters(), or a list of model-objects that is supported by model_parameters()."

This implies that pool_parameters() should work for any parameters_model object. However, the sample code below that tries to pool parameters for a list of parameters_model objects that are in turn derived from htest objects produces an error.

library(mice)
library(parameters)

data_with_missings <- nhanes
data_imputed <- mice(data_with_missings, printFlag = FALSE)

models <- lapply(1:data_imputed$m,  function(i) {
  
  data_i <- complete(data_imputed, action = i)
  model <- cor.test(data_i$chl, data_i$bmi)
  model_parameters(model)
  
  })

class(models[[1]])
#> [1] "parameters_model" "see_parameters_model" "data.frame"
pool_parameters(models)
#> Error in split.default(x = seq_len(nrow(x)), f = f, drop = drop, ...): Gruppenlänge ist 0 aber Datenlänge ist > 0

^{Created on 2022-07-26 by the reprex package (v2.0.1)}