removing datasets tests

ropensci · Apr 24, 2024 · 55717e5 · 55717e5
1 parent 632d019
commit 55717e5
Show file tree

Hide file tree

Showing 8 changed files with 3 additions and 31,414 deletions.
diff --git a/R/geometry_utils.R b/R/geometry_utils.R
@@ -31,21 +31,15 @@ geometry_handler <- function(x, geom_big = "asis", size = 40, n = 10, verbose =
           }
         },
         axe = {
-          .Deprecated(msg = "Using 'axe=' is deprecated Since rgbif v3.8.0. Please
+          .Deprecated(msg = "Using 'axe=' is deprecated Since rgbif v3.8.0. Please 
                       use occ_download(pred_within('...')) instead for complex polygons.")
           warning("This might return error or not work correctly, because of new polygon interpretation by GBIF.")
           check_for_a_pkg("sf")
-          check_for_a_pkg("wk")
           xsf <- sf::st_as_sfc(x[i])
           gt <- sf::st_make_grid(xsf, cellsize = rep(size, 2), n = rep(n, 2))
           res <- sf::st_intersection(xsf, gt)
-          out <- unlist(lapply(res, function(w) {
-            if (inherits(w, "MULTIPOLYGON")) { 
-              mp2wkt(w)
-            } else { 
-              sf::st_as_text(w) 
-            }
-          out   
+          unlist(lapply(res, function(w) {
+            if (inherits(w, "MULTIPOLYGON")) mp2wkt(w) else sf::st_as_text(w)
           }))
         }
       )

diff --git a/tests/fixtures/datasets.yml b/tests/fixtures/datasets.yml
diff --git a/tests/fixtures/datasets_checklist.yml b/tests/fixtures/datasets_checklist.yml
diff --git a/tests/fixtures/datasets_contact.yml b/tests/fixtures/datasets_contact.yml
diff --git a/tests/fixtures/datasets_deleted_duplicate.yml b/tests/fixtures/datasets_deleted_duplicate.yml
diff --git a/tests/fixtures/datasets_metadata.yml b/tests/fixtures/datasets_metadata.yml
diff --git a/tests/fixtures/datasets_single.yml b/tests/fixtures/datasets_single.yml
diff --git a/tests/testthat/test-datasets.r b/tests/testthat/test-datasets.r