diff --git a/tests/testthat/test-slide_timing.R b/tests/testthat/test-slide_timing.R
index 219a60d..8159149 100644
--- a/tests/testthat/test-slide_timing.R
+++ b/tests/testthat/test-slide_timing.R
@@ -235,6 +235,24 @@
   expect_true(any(grepl("Überblick", html, fixed = TRUE)))
 })
 
+test_that("transcript view script is included", {
+  skip_if_not_pandoc()
+  rmd <- local_temp_rmd_file(
+    "---",
+    "title: Transcript test",
+    "output: revealjs.ids::revealjs_presentation",
+    "---",
+    "",
+    "## Slide",
+    "",
+    "::: notes",
+    "Note text",
+    ":::"
+  )
+  html <- .render_and_read(rmd, xml = FALSE)
+  expect_true(any(grepl("ids-transcript", html)))
+})
+
 test_that("a user-supplied totalTime is respected", {
   skip_if_not_pandoc()
   rmd <- local_temp_rmd_file(