aports/testing/perl-anyevent-xmpp/delivery-receipt-2.patch
2024-01-06 22:13:39 +00:00

25 lines
981 B
Diff

Patch-Source: https://github.com/AnyEvent-XMPP/AnyEvent-XMPP/commit/23648ed086730064776a325055e3ff5fa75ad3b2.patch
--
From 23648ed086730064776a325055e3ff5fa75ad3b2 Mon Sep 17 00:00:00 2001
From: jlfranklin <franklin@sentaidigital.com>
Date: Mon, 9 May 2016 10:28:25 -0400
Subject: [PATCH] Generate an event from the XMPP Connection object when a
delivery receipt comes in. (#9)
---
lib/AnyEvent/XMPP/Ext/Receipts.pm | 1 +
1 file changed, 1 insertion(+)
diff --git a/lib/AnyEvent/XMPP/Ext/Receipts.pm b/lib/AnyEvent/XMPP/Ext/Receipts.pm
index ebee4fb..3fb1c3c 100644
--- a/lib/AnyEvent/XMPP/Ext/Receipts.pm
+++ b/lib/AnyEvent/XMPP/Ext/Receipts.pm
@@ -133,6 +133,7 @@ sub init {
# supports receipts.
$supports_receipts{$node->attr('from')} = 1;
$self->stop_event;
+ $con->event (delivery_receipt => $self, $node);
}
# Figure out if this is a message which requests a receipt, such as