moved to https

beanumber · Jul 19, 2017 · 890ba1e · 890ba1e
1 parent 3e5a30e
commit 890ba1e
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 3 deletions.
diff --git a/R/etl_extract.R b/R/etl_extract.R
@@ -43,7 +43,7 @@ etl_extract.etl_mtcars <- function(obj, ...) {
 #' @examples
 #' cars <- etl("mtcars")
 #' urls <- c("https://raw.githubusercontent.com/beanumber/etl/master/etl.Rproj",
-#' "http://www.reddit.com/robots.txt")
+#' "https://www.reddit.com/robots.txt")
 #' smart_download(cars, src = urls)
 #' # won't download again if the files are already there
 #' smart_download(cars, src = urls)

diff --git a/man/smart_download.Rd b/man/smart_download.Rd
diff --git a/tests/testthat/test-etl.R b/tests/testthat/test-etl.R
@@ -86,7 +86,8 @@ test_that("smart_download works", {
   cars <- etl("mtcars")
   # first download some files
 #  if (!.Platform$OS.type == "windows") {
-    urls <- c("https://raw.githubusercontent.com/beanumber/etl/master/etl.Rproj", "http://www.reddit.com/robots.txt")
+    urls <- c("https://raw.githubusercontent.com/beanumber/etl/master/etl.Rproj",
+              "https://www.reddit.com/robots.txt")
     expect_length(smart_download(cars, src = urls), 2)
     # then try to download them again
     expect_length(list.files(attr(cars, "raw_dir")), 3)