diff --git a/R/check_tbl_values.R b/R/check_tbl_values.R index ab7cdc25..a30175c8 100644 --- a/R/check_tbl_values.R +++ b/R/check_tbl_values.R @@ -1,7 +1,7 @@ #' Check model output data tbl contains valid value combinations #' #' @inherit check_tbl_colnames params -#' @inherit check_tbl_col_types return +#' @inherit check_tbl_colnames return #' @export check_tbl_values <- function(tbl, round_id, file_path, hub_path) { config_tasks <- hubUtils::read_config(hub_path, "tasks") @@ -43,6 +43,7 @@ check_tbl_values <- function(tbl, round_id, file_path, hub_path) { msg_subject = "Data rows", msg_attribute = "valid value combinations", msg_verbs = c("contain", "do not contain"), + error = TRUE, details = details ) } diff --git a/man/check_tbl_values.Rd b/man/check_tbl_values.Rd index 1bcd89ad..cc652d83 100644 --- a/man/check_tbl_values.Rd +++ b/man/check_tbl_values.Rd @@ -28,7 +28,7 @@ files within the \code{hub-config} directory.} Depending on whether validation has succeeded, one of: \itemize{ \item \verb{} condition class object. -\item \verb{} condition class object. +\item \verb{} condition class object. } Returned object also inherits from subclass \verb{}. diff --git a/tests/testthat/_snaps/check_tbl_values.md b/tests/testthat/_snaps/check_tbl_values.md index 4c47c019..618b9f43 100644 --- a/tests/testthat/_snaps/check_tbl_values.md +++ b/tests/testthat/_snaps/check_tbl_values.md @@ -14,7 +14,7 @@ check_tbl_values(tbl = tbl, round_id = round_id, file_path = file_path, hub_path = hub_path) Output - - Warning: - Data rows do not contain valid value combinations Affected rows: 1 + + Error: + ! Data rows do not contain valid value combinations Affected rows: 1