summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/kernel/xml.hpp
diff options
context:
space:
mode:
Diffstat (limited to 'sca-cpp/trunk/kernel/xml.hpp')
-rw-r--r--sca-cpp/trunk/kernel/xml.hpp2
1 files changed, 1 insertions, 1 deletions
diff --git a/sca-cpp/trunk/kernel/xml.hpp b/sca-cpp/trunk/kernel/xml.hpp
index fb7c0a6cf6..1f1c664c2d 100644
--- a/sca-cpp/trunk/kernel/xml.hpp
+++ b/sca-cpp/trunk/kernel/xml.hpp
@@ -253,7 +253,7 @@ const char* encoding = "UTF-8";
const list<value> expandElementValues(const value& n, const list<value>& l) {
if (isNil(l))
return l;
- return cons<value>(value(cons<value>(element, cons<value>(n, (list<value>)car(l)))), expandElementValues(n, cdr(l)));
+ return cons<value>(value(cons<value>(element, cons<value>(n, isList(car(l))? (list<value>)car(l) : mklist(car(l))))), expandElementValues(n, cdr(l)));
}
const failable<bool> writeList(const list<value>& l, const xmlTextWriterPtr xml) {