From 208dde8105928404941a6341ff7cdbedff6adb7c Mon Sep 17 00:00:00 2001
From: Matthew Wild <mwild1@gmail.com>
Date: Sat, 22 Nov 2008 19:07:41 +0000
Subject: Add helper function for adding message bodies to stanzas

---
 util/stanza.lua | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'util/stanza.lua')

diff --git a/util/stanza.lua b/util/stanza.lua
index 36e07317..df0d43ff 100644
--- a/util/stanza.lua
+++ b/util/stanza.lua
@@ -30,6 +30,11 @@ end
 function stanza_mt:query(xmlns)
 	return self:tag("query", { xmlns = xmlns });
 end
+
+function stanza_mt:body(text, attr)
+	return self:tag("body", attr):text(text);
+end
+
 function stanza_mt:tag(name, attrs)
 	local s = stanza(name, attrs);
 	(self.last_add[#self.last_add] or self):add_direct_child(s);
-- 
cgit v1.2.3