--- a/util/dataforms.lua	Fri Jan 22 14:48:30 2010 +0000
+++ b/util/dataforms.lua	Fri Jan 22 14:58:31 2010 +0000
@@ -23,8 +23,8 @@
 	return setmetatable(layout, form_mt);
 end
 
-function form_t.form(layout, data)
-	local form = st.stanza("x", { xmlns = xmlns_forms, type = "form" });
+function form_t.form(layout, data, formtype)
+	local form = st.stanza("x", { xmlns = xmlns_forms, type = formtype or "form" });
 	if layout.title then
 		form:tag("title"):text(layout.title):up();
 	end