From 328e86be9f0d44c7ab11753b6910d6665d3f7470 Mon Sep 17 00:00:00 2001 From: boB Rudis Date: Thu, 30 Nov 2017 21:36:45 -0500 Subject: [PATCH] no-sandbox --- R/read-html.r | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/read-html.r b/R/read-html.r index c76cae9..a80584c 100644 --- a/R/read-html.r +++ b/R/read-html.r @@ -9,7 +9,7 @@ #' chrome_read_html("https://www.r-project.org/") chrome_read_html <- function(url, chrome_bin=Sys.getenv("HEADLESS_CHROME")) { url <- shQuote(url) - tmp <- system2(chrome_bin, c("--headless", "--disable-gpu", "--dump-dom", url), stdout=TRUE) + tmp <- system2(chrome_bin, c("--headless", "--no-sandbox", "--disable-gpu", "--dump-dom", url), stdout=TRUE) xml2::read_html(paste0(tmp, collapse="\n")) } @@ -24,7 +24,7 @@ chrome_read_html <- function(url, chrome_bin=Sys.getenv("HEADLESS_CHROME")) { #' chrome_dump_pdf("https://www.r-project.org/") chrome_dump_pdf <- function(url, chrome_bin=Sys.getenv("HEADLESS_CHROME")) { url <- shQuote(url) - tmp <- system2(chrome_bin, c("--headless", "--disable-gpu", "--print-to-pdf", url)) + tmp <- system2(chrome_bin, c("--headless", "--no-sandbox", "--disable-gpu", "--print-to-pdf", url)) } #' Capture a screenshot @@ -45,7 +45,7 @@ chrome_dump_pdf <- function(url, chrome_bin=Sys.getenv("HEADLESS_CHROME")) { #' chrome_shot("https://www.r-project.org/logo/Rlogo.svg") chrome_shot <- function(url, width=NULL, height=NULL, chrome_bin=Sys.getenv("HEADLESS_CHROME")) { - args <- c("--headless", "--disable-gpu", "--screenshot") + args <- c("--headless", "--no-sandbox", "--disable-gpu", "--screenshot") url <- shQuote(url)