From 75fd176a63cbf8d95e1ccdf19073d9bf05a25e80 Mon Sep 17 00:00:00 2001
From: Johanna Raisa <johanna.raisa@gmail.com>
Date: Fri, 20 May 2022 10:16:10 +0300
Subject: [PATCH] Bug 31481: pass message_id to SMS drivers

This patch adds message_id to _send_message_by_sms and sms_send
so the driver could be build to catch SMS gateways delivery report.

Test plan:
1) Apply the patch
2) prove t/SMS.t

Sponsored-by: Koha-Suomi Oy

Signed-off-by: David Nind <david@davidnind.com>
---
 C4/Letters.pm | 1 +
 C4/SMS.pm     | 1 +
 t/SMS.t       | 1 +
 3 files changed, 3 insertions(+)

diff --git a/C4/Letters.pm b/C4/Letters.pm
index 7c136f32f9..468fc8f820 100644
--- a/C4/Letters.pm
+++ b/C4/Letters.pm
@@ -1519,6 +1519,7 @@ sub _send_message_by_sms {
         {
             destination => $patron->smsalertnumber,
             message     => $message->{'content'},
+            message_id  => $message->{'message_id'},
         }
     );
 
diff --git a/C4/SMS.pm b/C4/SMS.pm
index ce3358f66a..2286ee10a4 100644
--- a/C4/SMS.pm
+++ b/C4/SMS.pm
@@ -120,6 +120,7 @@ sub send_sms {
         $sent = $sender->send_sms(
             to   => $params->{destination},
             text => $params->{message},
+            _message_id => $params->{'message_id'},
         );
     };
 
diff --git a/t/SMS.t b/t/SMS.t
index bf8de65152..2e020c05d9 100755
--- a/t/SMS.t
+++ b/t/SMS.t
@@ -57,6 +57,7 @@ $send_sms = C4::SMS->send_sms({
     destination => '+33123456789',
     message => 'my message',
     driver => 'Test',
+    message_id => 1,
 });
 is( $send_sms, 1, 'send_sms returns 1' );
 
-- 
2.30.2