clix/receive.lua

changeset 12
1793fca3d707
child 17
fa9efbef8a0c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/clix/receive.lua	Thu Jan 07 02:31:18 2010 +0000
@@ -0,0 +1,13 @@
+return function (opts, args)
+	local function on_message(message)
+		local body = message:get_child("body");
+		if body then
+			print(body:get_text());
+		end
+	end
+	local function on_connect(conn)
+		conn:hook("message", on_message);
+		conn:send(verse.presence());
+	end
+	clix_connect(opts, on_connect);
+end

mercurial