From c072d79c1342e7baafeacdd987c2fe9c3c3ec093 Mon Sep 17 00:00:00 2001
From: mitchellmanware <memanware@gmail.com>
Date: Wed, 21 Feb 2024 13:09:30 -0500
Subject: [PATCH] Sys.sleep()'s again

---
 R/download_test_support.R                | 2 +-
 tests/testthat/test-download_functions.R | 1 -
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/R/download_test_support.R b/R/download_test_support.R
index 22db73e9..3a507e9f 100644
--- a/R/download_test_support.R
+++ b/R/download_test_support.R
@@ -26,7 +26,7 @@ check_url_status <- function(
   }
 
   status <- hd$status_code
-  Sys.sleep(2)
+  Sys.sleep(1.5)
   return(status == http_status_ok)
 }
 
diff --git a/tests/testthat/test-download_functions.R b/tests/testthat/test-download_functions.R
index 43e2396f..8dcd85e4 100644
--- a/tests/testthat/test-download_functions.R
+++ b/tests/testthat/test-download_functions.R
@@ -964,7 +964,6 @@ testthat::test_that("MODIS download error cases.", {
                           commands_path = commands_path,
                           url_status = url_status)
   # remove file with commands after test
-  Sys.sleep(1)
   file.remove(commands_path)
 })