From b749af3c01f597c546a7b8df23c47ab753a88f41 Mon Sep 17 00:00:00 2001 From: simonpcouch Date: Tue, 13 Dec 2022 12:11:17 -0500 Subject: [PATCH] unexport unused check helpers --- NAMESPACE | 2 -- R/aaa_models.R | 4 ---- man/set_new_model.Rd | 8 +------- 3 files changed, 1 insertion(+), 13 deletions(-) diff --git a/NAMESPACE b/NAMESPACE index 77a011c37..3bd487e2a 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -157,8 +157,6 @@ export(boost_tree) export(cforest_train) export(check_empty_ellipse) export(check_final_param) -export(check_model_doesnt_exist) -export(check_model_exists) export(condense_control) export(contr_one_hot) export(control_parsnip) diff --git a/R/aaa_models.R b/R/aaa_models.R index 4541005cf..9c92439f9 100644 --- a/R/aaa_models.R +++ b/R/aaa_models.R @@ -123,8 +123,6 @@ check_eng_val <- function(eng) { invisible(NULL) } -#' @rdname set_new_model -#' @export check_model_exists <- function(model) { if (rlang::is_missing(model) || length(model) != 1 || !is.character(model)) { rlang::abort("Please supply a character string for a model name (e.g. `'linear_reg'`)") @@ -139,8 +137,6 @@ check_model_exists <- function(model) { invisible(NULL) } -#' @rdname set_new_model -#' @export check_model_doesnt_exist <- function(model) { if (rlang::is_missing(model) || length(model) != 1 || !is.character(model)) { rlang::abort("Please supply a character string for a model name (e.g. `'linear_reg'`)") diff --git a/man/set_new_model.Rd b/man/set_new_model.Rd index b443eb397..1c6a809ec 100644 --- a/man/set_new_model.Rd +++ b/man/set_new_model.Rd @@ -1,8 +1,6 @@ % Generated by roxygen2: do not edit by hand % Please edit documentation in R/aaa_models.R -\name{check_model_exists} -\alias{check_model_exists} -\alias{check_model_doesnt_exist} +\name{set_new_model} \alias{set_new_model} \alias{set_model_mode} \alias{set_model_engine} @@ -19,10 +17,6 @@ \alias{get_encoding} \title{Tools to Register Models} \usage{ -check_model_exists(model) - -check_model_doesnt_exist(model) - set_new_model(model) set_model_mode(model, mode)