fix csw transaction for auth headers

eblondel · Jul 5, 2021 · c408579 · c408579
1 parent 8f294ed
commit c408579
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/CSWTransaction.R b/R/CSWTransaction.R
@@ -40,7 +40,7 @@ CSWTransaction <- R6Class("CSWTransaction",
         constraint = constraint
       )
       super$initialize(op, "POST", url, request = private$xmlElement,
-                       user = user, pwd = pwd, token = token, headers = list(),
+                       user = user, pwd = pwd, token = token, headers = headers,
                        contentType = "text/xml", mimeType = "text/xml",
                        logger = logger, ...)
       self$wrap <- TRUE