... says not used

Author: dsweber2

R/epi_recipe.R

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

R/extract.R

@@ -18,6 +18,7 @@
 #'
 #' extract_argument(f, "layer_residual_quantiles", "symmetrize")
 extract_argument <- function(x, name, arg, ...) {
+  rlang::check_dots_empty()
   UseMethod("extract_argument")
 }
 

R/frosting.R

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

R/tidy.R

@@ -49,6 +49,7 @@ 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_"