error checking model from parsnip object: operator is invalid

Tried to check_model using a very simple glmnet classification task.

Code from here:
https://stackoverflow.com/questions/65969913/extract-plain-model-from-tidymodel-object

library(magrittr)
library(tidymodels)
library(performance)

data(two_class_dat)

glm_spec <- logistic_reg() %>%
  set_engine("glmnet")

norm_rec <- recipe(Class ~ A + B, data = two_class_dat) %>%
  step_normalize(all_predictors())

glm_fit <- workflow() %>%
  add_recipe(norm_rec) %>%
  add_model(glm_spec) %>%
  fit(two_class_dat) %>%
  pull_workflow_fit()



performance::check_model(glm_fit)

Error: $ operator is invalid for atomic vectors

Start by running the supplied tidymodels and glmnet example, then trace how performance::check_model handles the object returned by pull_workflow_fit(). Identify where the atomic-vector error occurs and add regression coverage for this reproducible classification case; done means check_model no longer raises that error for the example.