Bug 31112: CanBookBeRenewed: take into account patrons with more than 1 hold to a...

[srvgit] / C4 / Message.pm

diff --git a/C4/Message.pm b/C4/Message.pm
index e10e3c5..7a55152 100644 (file)
--- a/C4/Message.pm
+++ b/C4/Message.pm
@@ -22,10 +22,10 @@ package C4::Message;
 use strict;
 use warnings;
 use C4::Context;
-use C4::Letters;
-use YAML::XS;
+use C4::Letters qw( GetPreparedLetter EnqueueLetter );
+use YAML::XS qw( Dump );
 use Encode;
-use Carp;
+use Carp qw( carp );
 
 =head1 NAME
 
@@ -184,10 +184,7 @@ sub _to_address {
             || $borrower->{emailpro}
             || $borrower->{B_email};
     } elsif ($transport eq 'sms') {
-        $address = $borrower->{smsalertnumber}
-            || $borrower->{phone}
-            || $borrower->{phonepro}
-            || $borrower->{B_phone};
+        $address = $borrower->{smsalertnumber};
     } else {
         warn "'$transport' is an unknown message transport.";
     }