diff --git a/R/server.R b/R/server.R
index eb7c96c1..8c87ab99 100644
--- a/R/server.R
+++ b/R/server.R
@@ -268,6 +268,7 @@ generate_server.data_block <- function(x, id, ...) {
 }
 
 #' @param in_dat Reactive input data
+#' @param is_prev_valid Useful to validate the current block
 #' @rdname generate_server
 #' @export
 generate_server.transform_block <- function(x, in_dat, id, is_prev_valid, ...) {
diff --git a/inst/examples/stack/app.R b/inst/examples/stack/app.R
index 225d3c6a..67ab2fec 100644
--- a/inst/examples/stack/app.R
+++ b/inst/examples/stack/app.R
@@ -1,13 +1,2 @@
 library(blockr)
-
-stack <- new_stack()
-id <- "mystack"
-
-shiny::shinyApp(
-  ui = bslib::page_fluid(
-    generate_ui(stack, id)
-  ),
-  server = function(input, output, session) {
-    stack <- generate_server(stack, id)
-  }
-)
+serve_stack(new_stack())
diff --git a/man/generate_server.Rd b/man/generate_server.Rd
index 27f2f869..6ad2f85d 100644
--- a/man/generate_server.Rd
+++ b/man/generate_server.Rd
@@ -39,6 +39,8 @@ generate_server(x, ...)
 
 \item{in_dat}{Reactive input data}
 
+\item{is_prev_valid}{Useful to validate the current block}
+
 \item{new_block}{For dynamically inserted blocks.}
 
 \item{workspace}{Stack workspace}