@@ -83,20 +83,20 @@ test_that("schedule display works", {
83
83
# expect_snapshot(tzs)
84
84
# })
85
85
86
- test_that(" schedule timezone works" , {
87
- scoped_experimental_silence()
88
-
89
- tzs <- get_timezones(test_conn_1 )
90
- set_schedule_remove(d_var_sch )
91
-
92
- tmp <- set_schedule_minute(d_var_sch , n = 15 , timezone = tzs $ `America/New_York (-04:00)` )
93
- expect_equal(tmp $ schedule_data $ timezone , tzs $ `America/New_York (-04:00)` )
94
-
95
- tmp2 <- set_schedule_minute(d_var_sch , n = 10 , timezone = tzs $ `Universal (+00:00)` )
96
- expect_equal(tmp $ schedule_data $ timezone , tzs $ `Universal (+00:00)` )
97
-
98
- set_schedule_remove(d_var_sch )
99
- })
86
+ # test_that("schedule timezone works", {
87
+ # scoped_experimental_silence()
88
+ #
89
+ # tzs <- get_timezones(test_conn_1)
90
+ # set_schedule_remove(d_var_sch)
91
+ #
92
+ # tmp <- set_schedule_minute(d_var_sch, n = 15, timezone = tzs$`America/New_York (-04:00)`)
93
+ # expect_equal(tmp$schedule_data$timezone, tzs$`America/New_York (-04:00)`)
94
+ #
95
+ # tmp2 <- set_schedule_minute(d_var_sch, n = 10, timezone = tzs$`Universal (+00:00)`)
96
+ # expect_equal(tmp$schedule_data$timezone, tzs$`Universal (+00:00)`)
97
+ #
98
+ # set_schedule_remove(d_var_sch)
99
+ # })
100
100
101
101
test_that(" get_schedules works" , {
102
102
scoped_experimental_silence()
0 commit comments