|
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 |
- |
|
|