Convert application/xml to text before parsing.

Closes #160
r-lib · Oct 17, 2014 · 7ed5bc1 · 7ed5bc1
1 parent ace6036
commit 7ed5bc1
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -28,7 +28,8 @@
 
 * Default "Accepts" header set to 
   `application/json, text/xml, application/xml, */*`: this should slightly
-  increase the likelihood of getting xml back.
+  increase the likelihood of getting xml back. `application/xml` is correctly
+  converted to text before being parsed to `XML::xmlParse()` (#160).
 
 * Make it again possible to override the content type set up by `POST()`
   when sending data (#140).

diff --git a/R/content-parse.r b/R/content-parse.r
@@ -62,7 +62,7 @@ parsers$`application/x-www-form-urlencoded` <- function(x) {
 }
 parsers$`application/xml` <- function(x, ...) {
   need_package("XML")
-  XML::xmlParse(x, ...)
+  XML::xmlParse(parse_text(x, encoding = "UTF-8"), ...)
 }
 
 # Text formats -----------------------------------------------------------------