1 files changed, 1 insertions, 1 deletions

diff --git a/src/xml.c b/src/xml.c
index 43eef260a99..16907d4b44a 100644
--- a/src/xml.c
+++ b/src/xml.c
@@ -96,7 +96,7 @@ parse_region (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, int html
   if (! NILP (base_url))
     {
       CHECK_STRING (base_url);
-      burl = SDATA (base_url);
+      burl = SSDATA (base_url);
     }
 
   bytes = CHAR_TO_BYTE (iend) - CHAR_TO_BYTE (istart);