fix examples using htmltools::browsable

r-lib · Feb 18, 2021 · ccae5f3 · ccae5f3
1 parent 14c666b
commit ccae5f3
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/R/inlineSVG.R b/R/inlineSVG.R
@@ -1,4 +1,4 @@
-#' Run plotting code and view svg in RStudio Viewer or web broswer.
+#' Run plotting code and view svg in RStudio Viewer or web browser.
 #'
 #' This is useful primarily for testing. Requires the \code{htmltools}
 #' package.
@@ -8,7 +8,7 @@
 #' @keywords internal
 #' @export
 #' @examples
-#' if (require("htmltools")) {
+#' if (interactive() && require("htmltools")) {
 #'   htmlSVG(plot(1:10))
 #'   htmlSVG(hist(rnorm(100)))
 #' }

diff --git a/man/htmlSVG.Rd b/man/htmlSVG.Rd