|
Lines 754-759
END_SQL
Link Here
|
| 754 |
unless @message_transport_types; |
754 |
unless @message_transport_types; |
| 755 |
|
755 |
|
| 756 |
my $print_sent = 0; # A print notice is not yet sent for this patron |
756 |
my $print_sent = 0; # A print notice is not yet sent for this patron |
|
|
757 |
|
| 758 |
if ( C4::Context->preference('RedirectGuaranteeEmail') && $patron ) { |
| 759 |
|
| 760 |
# Get guarantor addresses |
| 761 |
my $guarantor_relationships = $patron->guarantor_relationships; |
| 762 |
my @guarantors = $guarantor_relationships->guarantors->as_list; |
| 763 |
foreach my $guarantor (@guarantors) { |
| 764 |
my $address = $guarantor->notice_email_address; |
| 765 |
push( @emails_to_use, $address ) if ($address); |
| 766 |
} |
| 767 |
} |
| 768 |
|
| 757 |
for my $mtt (@message_transport_types) { |
769 |
for my $mtt (@message_transport_types) { |
| 758 |
next if $mtt eq 'itiva'; |
770 |
next if $mtt eq 'itiva'; |
| 759 |
my $effective_mtt = $mtt; |
771 |
my $effective_mtt = $mtt; |
| 760 |
- |
|
|