From f210e62b45f2541e98b12a16d6c385122b099fb0 Mon Sep 17 00:00:00 2001
From: Matthias Meusburger <matthias.meusburger@biblibre.com>
Date: Tue, 16 Jun 2015 11:18:11 +0200
Subject: [PATCH] Bug 12802: Fix tests in Reserves.t

---
 C4/Letters.pm | 40 +++++++++++++++++++++++++++-------------
 1 file changed, 27 insertions(+), 13 deletions(-)

diff --git a/C4/Letters.pm b/C4/Letters.pm
index 6aac8ad3b3..d5340ed6f8 100644
--- a/C4/Letters.pm
+++ b/C4/Letters.pm
@@ -1016,19 +1016,33 @@ sub EnqueueLetter {
     }
 
     my $rs = Koha::Database->new->schema->resultset('MessageQueue');
-    for my $to_address ( @to_addresses ) {
-        $rs->create({
-            borrowernumber => $params->{borrowernumber},
-            subject => $params->{letter}{title},
-            content => $params->{letter}{content},
-            metadata => ( $params->{letter}{metadata} || '' ),
-            letter_code => ( $params->{letter}{code}     || ''),
-            message_transport_type => $params->{message_transport_type},
-            status => 'pending',
-            to_address => $to_address,
-            from_address => $from_address,
-            content_type => $params->{letter}{'content-type'},
-        });
+    if ($params->{message_transport_type} eq 'email') {
+      for my $to_address ( @to_addresses ) {
+          $rs->create({
+              borrowernumber => $params->{borrowernumber},
+              subject => $params->{letter}{title},
+              content => $params->{letter}{content},
+              metadata => ( $params->{letter}{metadata} || '' ),
+              letter_code => ( $params->{letter}{code}     || ''),
+              message_transport_type => $params->{message_transport_type},
+              status => 'pending',
+              to_address => $to_address,
+              from_address => $from_address,
+              content_type => $params->{letter}{'content-type'},
+          });
+      }
+    } else {
+          $rs->create({
+              borrowernumber => $params->{borrowernumber},
+              subject => $params->{letter}{title},
+              content => $params->{letter}{content},
+              metadata => ( $params->{letter}{metadata} || '' ),
+              letter_code => ( $params->{letter}{code}     || ''),
+              message_transport_type => $params->{message_transport_type},
+              status => 'pending',
+              from_address => $from_address,
+              content_type => $params->{letter}{'content-type'},
+          });
     }
     return scalar( @to_addresses );
 }
-- 
2.11.0