We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent e5667d7 commit 582a8a3Copy full SHA for 582a8a3
R/utils.R
@@ -405,9 +405,13 @@ select_decorators <- function(decorators, scope) {
405
#' @return A named list of lists with `teal_transform_module` objects.
406
#' @keywords internal
407
normalize_decorators <- function(decorators) {
408
- if (checkmate::test_names(names(decorators))) {
409
- lapply(decorators, list)
+ if (checkmate::test_list(decorators, "teal_transform_module")) {
+ if (checkmate::test_names(names(decorators))) {
410
+ lapply(decorators, list)
411
+ } else {
412
+ list(default = decorators)
413
+ }
414
} else {
- list(default = decorators)
415
+ decorators
416
}
417
0 commit comments