R/compost.R

In hardhat: Construct Modeling Packages

# This will eventually live in recipes
# https://github.com/tidymodels/recipes/issues/268

compost <- function(object) {

  if (!recipes::fully_trained(object)) {
    return(object)
  }

  object$template <- NULL
  object$retained <- FALSE

  object
}