disable webapi checks

bluegreen-labs · Feb 23, 2024 · a8761a5 · a8761a5
1 parent 99a1c7d
commit a8761a5
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/R/wf_request_batch.R b/R/wf_request_batch.R
@@ -53,7 +53,8 @@ wf_request_batch <- function(
           queue[[1]],
           user = user[1],
           time_out = time_out[1],
-          path = path[1], transfer = FALSE
+          path = path[1],
+          transfer = FALSE
           )
         queue <- queue[-1]
         user <- user[-1]

diff --git a/tests/testthat/test_cds.R b/tests/testthat/test_cds.R
@@ -6,8 +6,6 @@ if(!("ecmwfr" %in% keyring::keyring_list()$keyring)){
   keyring::keyring_create("ecmwfr", password = "test")
 }
 
-login_check <- FALSE
-
 # check if on github
 ON_GIT <- ifelse(
   Sys.getenv("GITHUB_ACTION") == "",
@@ -89,6 +87,8 @@ test_that("cds datasets returns data.frame or list", {
                                    simplify = FALSE), "list"))
 })
 
+login_check <- FALSE
+
 # Testing the cds request function
 test_that("cds request", {
   skip_on_cran()