#190 try with Accept = application/xml

eblondel · Jun 20, 2022 · b3d8711 · b3d8711
1 parent 10e8a1e
commit b3d8711
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/readISO19139.R b/R/readISO19139.R
@@ -33,7 +33,7 @@ readISO19139 <- function(file = NULL, url = NULL, raw = FALSE){
   encoding <- "UTF-8"
   raw_xml <- NULL
   if(!is.null(url)){
-    req <- httr::GET(url, httr::add_headers("Accept" = "text/xml"))
+    req <- httr::GET(url, httr::add_headers("Accept" = "application/xml"))
     if(httr::status_code(req) != 200){
       stop("The URL resource is unavailable")
     }