Wraped the examples which open a browser with interactive() clause

nareal · May 16, 2021 · 1b13e88 · 1b13e88
1 parent 455d8ca
commit 1b13e88
Show file tree

Hide file tree

Showing 4 changed files with 14 additions and 6 deletions.
diff --git a/R/download_french_data.R b/R/download_french_data.R
@@ -62,8 +62,10 @@ print.french_dataset <- function(x, ...) {
 #'
 #' @examples
 #' \donttest{
-#' ff_3f <- download_french_data('Fama/French 3 Factors')
-#' browse_details_page(ff_3f)
+#' if(interactive()){
+#'   ff_3f <- download_french_data('Fama/French 3 Factors')
+#'   browse_details_page(ff_3f)
+#' }
 #' }
 #'
 #' @export

diff --git a/R/french_data_list.R b/R/french_data_list.R
@@ -64,7 +64,9 @@ print.french_data_list <- function(x, ...) {
 #'
 #' @examples
 #' \donttest{
-#' browse_french_site()
+#' if(interactive()){
+#'   browse_french_site()
+#' }
 #' }
 #'
 #' @export

diff --git a/man/browse_details_page.Rd b/man/browse_details_page.Rd
diff --git a/man/browse_french_site.Rd b/man/browse_french_site.Rd