From a4590a1ae98596a50bbfd8147f3ce4d22660705b Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Mon, 14 Feb 2022 17:37:27 +0100
Subject: [PATCH] #9 fix WCS 1.1 tests over GS

---
 tests/testthat/test_WCSClient_v1_1.R | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/tests/testthat/test_WCSClient_v1_1.R b/tests/testthat/test_WCSClient_v1_1.R
index 61d4e1b..840fec7 100644
--- a/tests/testthat/test_WCSClient_v1_1.R
+++ b/tests/testthat/test_WCSClient_v1_1.R
@@ -13,14 +13,8 @@ test_that("WCS 1.1 - GeoServer",{
   caps <- wcs$getCapabilities()
   expect_is(caps, "WCSCapabilities")
   expect_equal(length(caps$getCoverageSummaries()), 5L)
-  
   sfdem <- caps$findCoverageSummaryById("sf:sfdem")
   expect_is(sfdem, "WCSCoverageSummary")
-  sfdem_desc <- sfdem$getDescription()
-  expect_is(sfdem_desc, "WCSCoverageDescription")
-  domain <- sfdem_desc$getDomain()
-  expect_is(domain, "WCSCoverageDomain")
-  expect_is(domain$getSpatialDomain(), "WCSCoverageSpatialDomain")
 })
 
 test_that("WCS 1.1.0 - GeoServer",{