From f16fe2af8d59fef156c29077a240a832d3e60ef2 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Thu, 10 Jun 2010 10:29:50 +0000
Subject: * builtins.toXML: propagate the string context.  This is a regression
   from the old ATerm-based evaluator.

---
 src/libexpr/value-to-xml.cc | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/libexpr/value-to-xml.cc')

diff --git a/src/libexpr/value-to-xml.cc b/src/libexpr/value-to-xml.cc
index e751fd300f..8955a8a339 100644
--- a/src/libexpr/value-to-xml.cc
+++ b/src/libexpr/value-to-xml.cc
@@ -69,6 +69,7 @@ static void printValueAsXML(EvalState & state, bool strict, bool location,
 
         case tString:
             /* !!! show the context? */
+            copyContext(v, context);
             doc.writeEmptyElement("string", singletonAttrs("value", v.string.s));
             break;
 
-- 
cgit 1.4.1