Function to retrieve complete html of an element

[hadley]

Seem like it would be useful for snapshot testing

[gaborcsardi]

Yeah. Here is a workaround for now:

ph <- webdriver::run_phantomjs()
s <- Session$new(port = ph$port)
s$go("https://tidyverse.org")
pre <- s$findElement(".blurb pre")
pre$executeScript("return arguments[0].innerHTML")
#> [1] "<code>install.packages(\"tidyverse\")\n</code>"