# HG changeset patch
# User Waqas Hussain <waqas20@gmail.com>
# Date 1412808421 14400
# Node ID 93ffe59a9546a9895acf734c395f2467d2556112
# Parent  ab68bb837fe0c86808fb21d9da3bd6d4e76c9f30# Parent  3728c30da4e3543411b60c578527536fb0d0a364
Merge 0.10->trunk

diff -r ab68bb837fe0 -r 93ffe59a9546 util/dataforms.lua
--- a/util/dataforms.lua	Sun Oct 05 15:37:46 2014 +0200
+++ b/util/dataforms.lua	Wed Oct 08 18:47:01 2014 -0400
@@ -121,7 +121,7 @@
 
 	for _, field in ipairs(layout) do
 		local tag;
-		for field_tag in stanza:childtags() do
+		for field_tag in stanza:childtags("field") do
 			if field.name == field_tag.attr.var then
 				tag = field_tag;
 				break;
diff -r ab68bb837fe0 -r 93ffe59a9546 util/stanza.lua
--- a/util/stanza.lua	Sun Oct 05 15:37:46 2014 +0200
+++ b/util/stanza.lua	Wed Oct 08 18:47:01 2014 -0400
@@ -202,8 +202,19 @@
 
 local xml_escape
 do
-	local escape_table = { ["'"] = "&apos;", ["\""] = "&quot;", ["<"] = "&lt;", [">"] = "&gt;", ["&"] = "&amp;" };
-	function xml_escape(str) return (s_gsub(str, "['&<>\"]", escape_table)); end
+	local escape_table = {
+		["'"] = "&apos;";
+		['"'] = "&quot;";
+		["<"] = "&lt;";
+		[">"] = "&gt;";
+		["&"] = "&amp;";
+		-- escape this whitespace because [\r\n\t] change into spaces in attributes
+		-- and \r\n changes into \n in text, and we want to preserve original bytes
+		["\t"] = "&#x9;";
+		["\n"] = "&#xA;";
+		["\r"] = "&#xD;";
+	};
+	function xml_escape(str) return (s_gsub(str, "['&<>\"\t\n\r]", escape_table)); end
 	_M.xml_escape = xml_escape;
 end