diff --git a/R/stack.R b/R/stack.R index 5d296fb7..452a9224 100644 --- a/R/stack.R +++ b/R/stack.R @@ -254,7 +254,7 @@ add_block <- function(stack, block, position = NULL) { } else { tmp <- initialize_block( - do.call(block, list(position = position)), + construct_block(block, position = position), data ) }