examples/ping.lua
changeset 60 b9fd051c0d7c
parent 55 9e32b6288c86
child 64 bf7521ed96eb
--- a/examples/ping.lua	Mon Mar 23 04:16:22 2009 +0200
+++ b/examples/ping.lua	Mon Mar 23 04:17:02 2009 +0200
@@ -11,7 +11,10 @@
 ping = { }
 
 function ping.send ( conn, to, success, fail )
-	iq.send ( conn, to, 'get', success, fail )
+	iq.send ( conn, to, 'get',
+		{
+			ping = { xmlns = 'urn:xmpp:ping' },
+		}, success, fail )
 end
 
 -- private
@@ -42,13 +45,14 @@
 		local time = os.time ()
 		ping.send ( lm.connection.bless ( main.connection () ), who,
 			function ()
-				main.print_info ( ('Pong: %d seconds'):format ( os.time () - time ) )
+				main.print_info ( who, ('Pong: %d seconds'):format ( os.time () - time ) )
 			end,
 			function ( mesg )
-				main.print_info ( 'Ping failed: ' .. mesg )
+				main.print_info ( who, 'Ping failed: ' .. mesg )
 			end )
 	end, true, 'jid' )
 
+--[[
 local ping_handler_registered = false
 
 hooks_d['hook-post-connect'].ping =
@@ -65,5 +69,6 @@
 	end
 
 main.add_feature ( 'urn:xmpp:ping' )
+--]]
 
 -- vim: se ts=4: --