--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/examples/muc.lua Sun Jul 26 15:15:20 2009 +0300
@@ -0,0 +1,43 @@
+
+local lm = require 'lm'
+local muc = require 'lm.muc'
+
+main.command ( 'room-config',
+ function ( args )
+ local who
+ if args then
+ who = args
+ else
+ who = main.current_buddy ()
+ end
+ local conn = lm.connection.bless ( main.connection () )
+ muc.owner_config ( conn, who,
+ function ( form, submit, reject )
+ insert_form ( form,
+ function ( form )
+ submit ( form,
+ function ()
+ main.print_info ( who, 'Room configuratino accepted' )
+ end,
+ function ( mesg )
+ main.print_info ( who, ('Room configuration failed: %s'):format ( mesg ) )
+ end )
+ end,
+ function ( form )
+ reject ( form,
+ function ()
+ main.print_info ( who, 'Room configuration cancelled' )
+ end,
+ function ( mesg )
+ main.print_info ( who, ('Room configuration cancellation failed: %s'):format ( mesg ) )
+ end )
+ end )
+ end,
+ function ( mesg )
+ main.print_info ( who, ('Room configutarion request failed: %s'):format ( mesg ) )
+ end )
+ end, false, 'jid' )
+
+commands_help['room-config'] = "[room_jid]\n\nRequests room configuration form from server. You must be owner of this room."
+
+-- vim: se ts=4: --