diff --git a/DESCRIPTION b/DESCRIPTION
index 1a2ae5515..2d776c270 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -66,7 +66,7 @@ Config/Needs/verdepcheck: pharmaverse/formatters, mllg/checkmate,
     davidgohel/officer, Merck/r2rtf, rstudio/rmarkdown, therneau/survival,
     r-lib/testthat, tidyverse/tibble, tidyverse/tidyr, r-lib/withr,
     r-lib/xml2
-Config/roxygen2/version: 8.0.0
+Config/roxygen2/version: 8.1.0
 Encoding: UTF-8
 Language: en-US
 LazyData: true
diff --git a/vignettes/guided_intermediate_split_reqs.Rmd b/vignettes/guided_intermediate_split_reqs.Rmd
index 26ea7cbf2..02e28b6d8 100644
--- a/vignettes/guided_intermediate_split_reqs.Rmd
+++ b/vignettes/guided_intermediate_split_reqs.Rmd
@@ -417,7 +417,6 @@ An toy example of this would be
 library(tibble)
 
 tpose_afun <- function(x, .var, .spl_context) {
-  spldf <<- .spl_context
   mycol <- tail(tail(.spl_context$cur_col_split_val, 1)[[1]], 1)
   cell <- switch(mycol,
     n = rcell(length(x), format = "xx"),
@@ -475,7 +474,7 @@ my_combo_df <- tribble(
 lyt_tpose_cols_only <- basic_table() |>
   split_cols_by("ARM", show_colcounts = TRUE) |>
   split_cols_by("STUDYID",
-    split_fun = add_combo_levels(my_combo_df, keep_levels = combo_df$valname),
+    split_fun = add_combo_levels(my_combo_df, keep_levels = my_combo_df$valname),
     show_colcounts = TRUE
   )