Skip test on CRAN

Signed-off-by: Stefan Widgren <[email protected]>

Author: stewid

tests/remotes.R

@@ -56,10 +56,12 @@ remote_remove(repo, "foobar")
 
 stopifnot(identical(remotes(repo), character(0)))
 
-refs <- remote_ls("https://github.com/ropensci/git2r")
-stopifnot(length(refs) > 0)
-stopifnot(names(refs) > 0)
-stopifnot(any(names(refs) == "HEAD"))
+if (identical(Sys.getenv("NOT_CRAN"), "true")) {
+    refs <- remote_ls("https://github.com/ropensci/git2r")
+    stopifnot(length(refs) > 0)
+    stopifnot(names(refs) > 0)
+    stopifnot(any(names(refs) == "HEAD"))
+}
 
 # an invalid URL should throw an error
 tools::assertError(remote_ls("bad"))