fix links

m7pr · m7pr · commit a3500a81787b · 2025-11-26T15:14:03.000+01:00
diff --git a/tests/testthat/test-shinytest2-tm_t_pp_medical_history.R b/tests/testthat/test-shinytest2-tm_t_pp_medical_history.R
@@ -54,7 +54,7 @@ testthat::test_that(
     app_driver <- app_driver_tm_t_pp_medical_history()
 
     testthat::expect_equal(
-      app_driver$get_text("#teal-teal_modules-active_tab .active > a"),
+      app_driver$get_text("a.nav-link.active"),
       "Medical History"
     )
     testthat::expect_equal(
diff --git a/tests/testthat/test-shinytest2-tm_t_pp_prior_medication.R b/tests/testthat/test-shinytest2-tm_t_pp_prior_medication.R
@@ -63,7 +63,7 @@ testthat::test_that(
     skip_if_too_deep(5)
     app_driver <- app_driver_tm_t_pp_prior_medication()
     testthat::expect_equal(
-      app_driver$get_text("#teal-teal_modules-active_tab .active > a"),
+      app_driver$get_text("a.nav-link.active"),
       "Prior Medication"
     )
     testthat::expect_equal(
diff --git a/tests/testthat/test-shinytest2-tm_t_smq.R b/tests/testthat/test-shinytest2-tm_t_smq.R
@@ -72,7 +72,7 @@ testthat::test_that(
     skip_if_too_deep(5)
     app_driver <- app_driver_tm_t_smq()
     testthat::expect_equal(
-      app_driver$get_text("#teal-teal_modules-active_tab .active > a"),
+      app_driver$get_text("a.nav-link.active"),
       "Adverse Events by SMQ Table"
     )
     testthat::expect_equal(
diff --git a/tests/testthat/test-shinytest2-tm_t_tte.R b/tests/testthat/test-shinytest2-tm_t_tte.R
@@ -93,7 +93,7 @@ testthat::test_that(
     skip_if_too_deep(5)
     app_driver <- app_driver_tm_t_tte()
     testthat::expect_equal(
-      app_driver$get_text("#teal-teal_modules-active_tab .active > a"),
+      app_driver$get_text("a.nav-link.active"),
       "Time To Event Table"
     )
     testthat::expect_equal(

Original file line number	Diff line number	Diff line change
`@@ -54,7 +54,7 @@ testthat::test_that(`
`54`	`54`	`app_driver <- app_driver_tm_t_pp_medical_history()`
`55`	`55`
`56`	`56`	`testthat::expect_equal(`
`57`		`- app_driver$get_text("#teal-teal_modules-active_tab .active > a"),`
	`57`	`+ app_driver$get_text("a.nav-link.active"),`
`58`	`58`	`"Medical History"`
`59`	`59`	`)`
`60`	`60`	`testthat::expect_equal(`
Original file line number	Diff line number	Diff line change
`@@ -63,7 +63,7 @@ testthat::test_that(`
`63`	`63`	`skip_if_too_deep(5)`
`64`	`64`	`app_driver <- app_driver_tm_t_pp_prior_medication()`
`65`	`65`	`testthat::expect_equal(`
`66`		`- app_driver$get_text("#teal-teal_modules-active_tab .active > a"),`
	`66`	`+ app_driver$get_text("a.nav-link.active"),`
`67`	`67`	`"Prior Medication"`
`68`	`68`	`)`
`69`	`69`	`testthat::expect_equal(`
Original file line number	Diff line number	Diff line change
`@@ -72,7 +72,7 @@ testthat::test_that(`
`72`	`72`	`skip_if_too_deep(5)`
`73`	`73`	`app_driver <- app_driver_tm_t_smq()`
`74`	`74`	`testthat::expect_equal(`
`75`		`- app_driver$get_text("#teal-teal_modules-active_tab .active > a"),`
	`75`	`+ app_driver$get_text("a.nav-link.active"),`
`76`	`76`	`"Adverse Events by SMQ Table"`
`77`	`77`	`)`
`78`	`78`	`testthat::expect_equal(`
Original file line number	Diff line number	Diff line change
`@@ -93,7 +93,7 @@ testthat::test_that(`
`93`	`93`	`skip_if_too_deep(5)`
`94`	`94`	`app_driver <- app_driver_tm_t_tte()`
`95`	`95`	`testthat::expect_equal(`
`96`		`- app_driver$get_text("#teal-teal_modules-active_tab .active > a"),`
	`96`	`+ app_driver$get_text("a.nav-link.active"),`
`97`	`97`	`"Time To Event Table"`
`98`	`98`	`)`
`99`	`99`	`testthat::expect_equal(`