# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1626274847 -7200
# Node ID 703fa6922493b3d9e1e501c1a1adb54e575b07c9
# Parent  aa0f11fb166cb8f59c77bd0c0b09e38a90a03c8f
clix raw: Add a convenience function for smacks <r>

diff -r aa0f11fb166c -r 703fa6922493 clix/raw.lua
--- a/clix/raw.lua	Sun Apr 18 23:36:18 2021 +0200
+++ b/clix/raw.lua	Wed Jul 14 17:00:47 2021 +0200
@@ -58,6 +58,9 @@
 				m = stwrap(verse.message),
 				p = stwrap(verse.presence),
 				iq = stwrap(verse.iq),
+				r = function ()
+					return verse.stanza("r", { xmlns = "urn:xmpp:sm:3" });
+				end,
 				ping = function(host)
 					return verse.iq{ type="get", to=host}:tag("ping", {xmlns="urn:xmpp:ping"});
 				end,