Lines 1854-1865
sub _koha_notify_reserve {
Link Here
|
1854 |
my $transports = $messagingpref->message_transport_types if $messagingpref; |
1854 |
my $transports = $messagingpref->message_transport_types if $messagingpref; |
1855 |
foreach my $mtt (keys %{$transports}) { |
1855 |
foreach my $mtt (keys %{$transports}) { |
1856 |
my $letter_code = $transports->{$mtt}; |
1856 |
my $letter_code = $transports->{$mtt}; |
1857 |
next if ( |
1857 |
next unless $messagingpref->mtt_deliverable($mtt); |
1858 |
( $mtt eq 'email' and not $to_address ) # No email address |
|
|
1859 |
or ( $mtt eq 'sms' and not $patron->smsalertnumber ) # No SMS number |
1860 |
or ( $mtt eq 'itiva' and C4::Context->preference('TalkingTechItivaPhoneNotification') ) # Notice is handled by TalkingTech_itiva_outbound.pl |
1861 |
or ( $mtt eq 'phone' and not $patron->phone ) # No phone number to call |
1862 |
); |
1863 |
|
1858 |
|
1864 |
&$send_notification($mtt, $letter_code); |
1859 |
&$send_notification($mtt, $letter_code); |
1865 |
$notification_sent++; |
1860 |
$notification_sent++; |
1866 |
- |
|
|