inst/shiny/tests/mytest.R

.GlobalEnv$.posts.path <- system.file(package = "blogyaml", "example_blog")
app <- ShinyDriver$new("../")
app$snapshotInit("mytest")
Sys.sleep(2)
app$setInputs(do = "click")
app$snapshot()
on.exit(rm(.posts.path, envir=.GlobalEnv))
ropenscilabs/blogyaml documentation built on May 24, 2019, 2:02 a.m.