Suppress a redundant warning

olivroy · olivroy · commit 4300baa0b8b3 · 2023-12-11T13:39:43.000-05:00
diff --git a/tests/testthat/test_crs.R b/tests/testthat/test_crs.R
@@ -17,7 +17,7 @@ test_that("st_crs works", {
   expect_silent(st_crs(nc1) <- st_crs(nc1))
 
   if (sf_extSoftVersion()[["GDAL"]] > "2.2.3") {
-    expect_error(st_crs("+proj=ll"), "invalid crs")
+    suppressWarnings(expect_error(st_crs("+proj=ll"), "invalid crs"))
   	# expect_error(st_crs("+proj=longlat +datum=NAD26"))
   }
   expect_silent(st_crs("+proj=longlat"))

Original file line number	Diff line number	Diff line change
`@@ -17,7 +17,7 @@ test_that("st_crs works", {`
`17`	`17`	`expect_silent(st_crs(nc1) <- st_crs(nc1))`
`18`	`18`
`19`	`19`	`if (sf_extSoftVersion()[["GDAL"]] > "2.2.3") {`
`20`		`- expect_error(st_crs("+proj=ll"), "invalid crs")`
	`20`	`+ suppressWarnings(expect_error(st_crs("+proj=ll"), "invalid crs"))`
`21`	`21`	`# expect_error(st_crs("+proj=longlat +datum=NAD26"))`
`22`	`22`	`}`
`23`	`23`	`expect_silent(st_crs("+proj=longlat"))`