Merge pull request #455 from mapme-initiative/develop

zivankaraman · web-flow · commit f58c2bd94211 · 2025-09-23T11:06:54.000+02:00
skip on CRAN
diff --git a/tests/testthat/test-calc_deforestation_drivers.R b/tests/testthat/test-calc_deforestation_drivers.R
@@ -1,4 +1,5 @@
 test_that("deforestation drivers works", {
+  skip_on_cran()
   x <- read_sf(
     system.file("extdata", "sierra_de_neiba_478140.gpkg",
       package = "mapme.biodiversity"
diff --git a/tests/testthat/test-get_carbon.R b/tests/testthat/test-get_carbon.R
@@ -1,4 +1,5 @@
 test_that("get_carbon works", {
+  skip_on_cran()
   outdir <- file.path(tempdir(), "mapme.data")
   .copy_resource_dir(outdir)
 
diff --git a/tests/testthat/test-ipbes.R b/tests/testthat/test-ipbes.R
@@ -8,6 +8,7 @@ test_that("get_ipbes_biomes works", {
 })
 
 test_that("calc_ipbes_biomes works", {
+  skip_on_cran()
   x <- read_sf(system.file("extdata", "shell_beach_protected_area_41057_B.gpkg",
     package = "mapme.biodiversity"
   ))

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,5 @@`
`1`	`1`	`test_that("deforestation drivers works", {`
	`2`	`+ skip_on_cran()`
`2`	`3`	`x <- read_sf(`
`3`	`4`	`system.file("extdata", "sierra_de_neiba_478140.gpkg",`
`4`	`5`	`package = "mapme.biodiversity"`
Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,5 @@`
`1`	`1`	`test_that("get_carbon works", {`
	`2`	`+ skip_on_cran()`
`2`	`3`	`outdir <- file.path(tempdir(), "mapme.data")`
`3`	`4`	`.copy_resource_dir(outdir)`
`4`	`5`