From fd6ea8356784e2b21b2bb99eaf0fc329e847be86 Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Tue, 31 Oct 2023 22:57:26 +0100
Subject: [PATCH] #113 fix vendor params in WCS GetCoverage

---
 R/WCSGetCoverage.R | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/R/WCSGetCoverage.R b/R/WCSGetCoverage.R
index 1c49cb6..9ecd040 100644
--- a/R/WCSGetCoverage.R
+++ b/R/WCSGetCoverage.R
@@ -172,10 +172,10 @@ WCSGetCoverage <- R6Class("WCSGetCoverage",
         if(!is.null(gridorigin)) namedParams$gridorigin <- gridorigin
         if(!is.null(gridoffsets)) namedParams$gridoffsets <- gridoffsets
         
-        vendorParams <- list(...)
-        if(length(vendorParams)>0){
-          namedParams <- c(namedParams, vendorParams)
-        }
+        #vendorParams <- list(...)
+        #if(length(vendorParams)>0){
+        #  namedParams <- c(namedParams, vendorParams)
+        #}
         
         mimeType <- format
         if(substr(serviceVersion,1,3)=="1.1") mimeType <- "text/xml"