pass local checks, fix breaking pkgdown

Author: dajmcdon

R/frosting.R

@@ -187,7 +187,7 @@ adjust_frosting.frosting <- function(
   } else {
     layer_names <- map_chr(x$layers, ~ attr(.x, "class")[1])
     starts_with_layer <- substr(which_layer, 1, 6) == "layer_"
-    if (!starts_with_step) which_layer <- paste0("layer_", which_layer)
+    if (!starts_with_layer) which_layer <- paste0("layer_", which_layer)
 
     if (!(which_layer %in% layer_names)) {
       cli::cli_abort(c(

R/tidy.R

@@ -103,13 +103,9 @@ tidy.frosting <- function(x, number = NA, id = NA, ...) {
   res
 }
 
-#' @rdname tidy.layer
 #' @export
 tidy.layer <- function(x, ...) {
-  rlang::abort(
-    paste0(
-      "No `tidy` method for a layer with classes: ",
-      paste0(class(x), collapse = ", ")
-    )
+  cli::cli_abort(
+    "No `tidy()` method exists for a layer with class: {.cls {class(x)}}."
   )
 }

_pkgdown.yml

@@ -48,6 +48,8 @@ reference:
     - epi_recipe
     - epi_workflow
     - add_epi_recipe
+    - adjust_epi_recipe
+    - add_model
     - predict.epi_workflow
     - fit.epi_workflow
     - augment.epi_workflow
@@ -62,6 +64,7 @@ reference:
     - frosting
     - ends_with("_frosting")
     - get_test_data
+    - tidy.frosting
   - title: Frosting layers
     contents:
     - contains("layer")