diff --git a/.github/workflows/check.yaml b/.github/workflows/check.yaml
index 4cbbeb68e1..6317f876e8 100644
--- a/.github/workflows/check.yaml
+++ b/.github/workflows/check.yaml
@@ -21,7 +21,7 @@ jobs:
     uses: insightsengineering/r.pkg.template/.github/workflows/audit.yaml@main
   r-cmd:
     name: R CMD Check 🧬
-    uses: insightsengineering/r.pkg.template/.github/workflows/build-check-install.yaml@main
+    uses: insightsengineering/r.pkg.template/.github/workflows/build-check-install.yaml@38b63dee0b54d8b50dd360b1b40258feb081ed54
     secrets:
       REPO_GITHUB_TOKEN: ${{ secrets.REPO_GITHUB_TOKEN }}
     with:
@@ -44,7 +44,7 @@ jobs:
       deps-installation-method: setup-r-dependencies
   r-cmd-non-cran:
     name: R CMD Check (non-CRAN) 🧬
-    uses: insightsengineering/r.pkg.template/.github/workflows/build-check-install.yaml@main
+    uses: insightsengineering/r.pkg.template/.github/workflows/build-check-install.yaml@38b63dee0b54d8b50dd360b1b40258feb081ed54
     secrets:
       REPO_GITHUB_TOKEN: ${{ secrets.REPO_GITHUB_TOKEN }}
     with:
diff --git a/R/arm_ref_comp.R b/R/arm_ref_comp.R
index e15a684d0a..f45c8bf2c4 100644
--- a/R/arm_ref_comp.R
+++ b/R/arm_ref_comp.R
@@ -46,7 +46,6 @@ arm_ref_comp_observer <- function(session,
   iv$add_validator(iv1)
   iv$add_validator(iv2)
 
-
   output[[output_id]] <- renderUI({
     if (isTRUE(on_off())) {
       df <- if (is.reactive(data)) {
diff --git a/R/tm_t_events_by_grade.R b/R/tm_t_events_by_grade.R
index d801f6f3a5..1ce06ae104 100644
--- a/R/tm_t_events_by_grade.R
+++ b/R/tm_t_events_by_grade.R
@@ -48,7 +48,7 @@ template_events_by_grade <- function(dataname,
   checkmate::assert_scalar(prune_diff)
 
   y <- list()
-
+  message("Random code modified")
   data_list <- list()
 
   data_list <- add_expr(
diff --git a/tests/testthat/test-shinytest2-tm_t_events_patyear.R b/tests/testthat/test-shinytest2-tm_t_events_patyear.R
index 2f04d38940..5f4812d96e 100644
--- a/tests/testthat/test-shinytest2-tm_t_events_patyear.R
+++ b/tests/testthat/test-shinytest2-tm_t_events_patyear.R
@@ -1,3 +1,5 @@
+message("Random modification")
+
 app_driver_tm_t_events_patyear <- function() {
   data <- teal.data::teal_data()
   data <- within(data, {