Skip to content

Commit

Permalink
chore: fix broken tests
Browse files Browse the repository at this point in the history
  • Loading branch information
vedhav committed Nov 6, 2023
1 parent 3908349 commit 37e5df3
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 4 deletions.
2 changes: 1 addition & 1 deletion R/choices_labeled.R
Original file line number Diff line number Diff line change
Expand Up @@ -378,7 +378,7 @@ value_choices.data.frame <- function(data, # nolint
df_choices <- dplyr::mutate_if(
df_choices,
.predicate = function(col) inherits(col, c("POSIXct", "POSIXlt", "POSIXt")),
.fun = function(col) {
.funs = function(col) {
if (is.null(attr(col, "tzone")) || all(attr(col, "tzone") == "")) {
format(trunc(col), "%Y-%m-%d %H:%M:%S")
} else {
Expand Down
6 changes: 3 additions & 3 deletions R/data_extract_module.R
Original file line number Diff line number Diff line change
Expand Up @@ -704,15 +704,15 @@ data_extract_multiple_srv.list <- function(data_extract, datasets, join_keys = N
checkmate::assert_list(datasets, types = c("reactive", "data.frame"), names = "named")
checkmate::assert_class(join_keys, "JoinKeys", null.ok = TRUE)
checkmate::assert(
checkmate::check_multi_class(select_validation_rule, class = c("function", "formula"), null.ok = TRUE),
checkmate::check_multi_class(select_validation_rule, classes = c("function", "formula"), null.ok = TRUE),
checkmate::check_list(select_validation_rule, types = c("function", "formula", "NULL"), null.ok = TRUE)
)
checkmate::assert(
checkmate::check_multi_class(filter_validation_rule, class = c("function", "formula"), null.ok = TRUE),
checkmate::check_multi_class(filter_validation_rule, classes = c("function", "formula"), null.ok = TRUE),
checkmate::check_list(filter_validation_rule, types = c("function", "formula", "NULL"), null.ok = TRUE)
)
checkmate::assert(
checkmate::check_multi_class(dataset_validation_rule, class = c("function", "formula"), null.ok = TRUE),
checkmate::check_multi_class(dataset_validation_rule, classes = c("function", "formula"), null.ok = TRUE),
checkmate::check_list(dataset_validation_rule, types = c("function", "formula", "NULL"), null.ok = TRUE)
)

Expand Down

0 comments on commit 37e5df3

Please sign in to comment.