Lm separation, privacy
* Library parts moved to lm.*
* mc_* renamed to plain names
* Privacy lists suppart (not tested)
local lm = require 'lm'
local attention = require 'lm.attention'
attention.handler (
function ( mesg )
local times = 0
main.timer ( 1,
function ()
if times < 6 then
main.beep ()
times = times + 1
return true
end
return false
end )
end )
main.command ( 'attention',
function ( args )
local who
if args.t then
who = args.t
else
who = main.full_jid ()
end
attention.send ( lm.connection.bless ( main.connection () ), who, args[1] )
end, true, 'jid' )
commands_help['attention'] = "[-t to] [message]\n\nTries to get buddy's attention."
local attention_handler = lm.message_handler.new ( attention.message_handler )
local attention_handler_registered = false
hooks_d['hook-post-connect'].attention =
function ( args )
lm.connection.bless( main.connection () ):handler ( attention_handler, 'message', 'normal' )
attention_handler_registered = true
hooks_d['hook-post-connect'].attention = nil
hooks_d['hook-quit'].attention =
function ( args )
if attention_handler_registered then
lm.connection.bless( main.connection () ):handler ( attention_handler, 'message' )
end
end
end
main.add_feature ( 'urn:xmpp:attention:0' )
-- vim: se ts=4: --