clix/receive.lua

Wed, 15 Sep 2010 16:53:32 +0100

author
Matthew Wild <mwild1@gmail.com>
date
Wed, 15 Sep 2010 16:53:32 +0100
changeset 43
1ec64b321834
parent 27
5b58c002d6ad
permissions
-rw-r--r--

clix.lua: Filter all log messages except those of the 'error' level unless -v is given

short_opts.h = "history";

return function (opts, args)
	if opts.short_help then
		print("Receive and display XMPP messages");
		return;
	end
	local function on_message(message)
		local body = message:get_child("body");
		local delay = message:get_child("delay", "urn:xmpp:delay");
		if body and (not delay or opts.history) then
			print(body:get_text());
		end
	end
	local function on_connect(conn)
		conn:hook("message", on_message);
	end
	clix_connect(opts, on_connect);
end

mercurial