not so many check_dots_emptys

Author: dsweber2

R/epi_recipe.R

@@ -57,7 +57,6 @@ epi_recipe.default <- function(x, ...) {
 #' r
 epi_recipe.epi_df <-
   function(x, formula = NULL, ..., vars = NULL, roles = NULL) {
-    rlang::check_dots_empty()
     if (!is.null(formula)) {
       if (!is.null(vars)) {
         rlang::abort(
@@ -289,7 +288,6 @@ is_epi_recipe <- function(x) {
 #'
 add_epi_recipe <- function(
     x, recipe, ..., blueprint = default_epi_recipe_blueprint()) {
-  rlang::check_dots_empty()
   workflows::add_recipe(x, recipe, ..., blueprint = blueprint)
 }
 

R/epi_workflow.R

@@ -113,7 +113,6 @@ is_epi_workflow <- function(x) {
 #' wf
 #' @export
 add_model <- function(x, spec, ..., formula = NULL) {
-  rlang::check_dots_empty()
   UseMethod("add_model")
 }
 
@@ -126,7 +125,6 @@ remove_model <- function(x) {
 #' @rdname add_model
 #' @export
 update_model <- function(x, spec, ..., formula = NULL) {
-  rlang::check_dots_empty()
   UseMethod("update_model")
 }
 

R/frosting.R

@@ -303,7 +303,6 @@ frosting <- function(layers = NULL, requirements = NULL) {
 #' @return a `frosting` object
 #' @export
 extract_frosting <- function(x, ...) {
-  rlang::check_dots_empty()
   UseMethod("extract_frosting")
 }
 

R/layer_predict.R

@@ -43,7 +43,6 @@
 layer_predict <-
   function(frosting, type = NULL, opts = list(), ...,
            id = rand_id("predict_default")) {
-    rlang::check_dots_empty()
     arg_is_chr_scalar(id)
     arg_is_chr_scalar(type, allow_null = TRUE)
     add_layer(

R/tidy.R

@@ -49,7 +49,6 @@ tidy.frosting <- function(x, number = NA, id = NA, ...) {
   # add id = NA as default. If both ID & number are non-NA, error.
   # If number is NA and ID is not, select the layer with the corresponding
   # ID. Only a single ID is allowed, as this follows the convention for number
-  rlang::check_dots_empty()
   num_oper <- length(x$layers)
   pattern <- "^layer_"