diff --git a/R/WMSGetFeatureInfo.R b/R/WMSGetFeatureInfo.R
index bcce779..45b4c31 100644
--- a/R/WMSGetFeatureInfo.R
+++ b/R/WMSGetFeatureInfo.R
@@ -25,7 +25,7 @@ WMSGetFeatureInfo <- R6Class("WMSGetFeatureInfo",
  ), 
  public = list(
    initialize = function(op, url, version, layers, srs, styles, feature_count = 1,
-                         x, y, width, height, bbox, info_format = "application/vnd.ogc.gml",
+                         x, y, width, height, bbox, info_format = "text/xml",
                          logger = NULL, ...) {
      
      mimeType <- switch(info_format,