-_lua_to_xmlrpc = function(stanza, ...)
- for i=1,select('#', ...) do
- stanza:tag("param"):tag("value");
- local object = select(i, ...);
- local h = map[type(object)];
- if h then
- h(stanza, object);
- else
- error("Type not supported by XML-RPC: " .. type(object));
- end
- stanza:up():up();
+_lua_to_xmlrpc = function(stanza, object)
+ local h = map[type(object)];
+ if h then
+ h(stanza, object);
+ else
+ error("Type not supported by XML-RPC: " .. type(object));