diff --git a/R/WMSLayer.R b/R/WMSLayer.R
index f38d9d2..91b7ce1 100644
--- a/R/WMSLayer.R
+++ b/R/WMSLayer.R
@@ -291,6 +291,7 @@ WMSLayer <- R6Class("WMSLayer",
         "application/vnd.ogc.gml" = "gml",
         "application/vnd.ogc.gml/3.1.1" = "gml",
         "application/json" = "json",
+        "text/xml" = "xml",
         "gml"                  
       )
       tempf = tempfile()