Lines 2001-2010
sub _koha_notify_reserve {
Link Here
|
2001 |
}; |
2001 |
}; |
2002 |
|
2002 |
|
2003 |
while ( my ( $mtt, $letter_code ) = each %{ $messagingprefs->{transports} } ) { |
2003 |
while ( my ( $mtt, $letter_code ) = each %{ $messagingprefs->{transports} } ) { |
2004 |
if ( ($mtt eq 'email' and not $to_address) or ($mtt eq 'sms' and not $borrower->{smsalertnumber}) ) { |
2004 |
next if ( |
2005 |
# email or sms is requested but not exist |
2005 |
( $mtt eq 'email' and not $to_address ) # No email address |
2006 |
next; |
2006 |
or ( $mtt eq 'sms' and not $borrower->{smsalertnumber} ) # No SMS number |
2007 |
} |
2007 |
or ( $mtt eq 'phone' and C4::Context->preference('TalkingTechItivaPhoneNotification') ) # Notice is handled by TalkingTech_itiva_outbound.pl |
|
|
2008 |
); |
2009 |
|
2008 |
&$send_notification($mtt, $letter_code); |
2010 |
&$send_notification($mtt, $letter_code); |
2009 |
$notification_sent++; |
2011 |
$notification_sent++; |
2010 |
} |
2012 |
} |
2011 |
- |
|
|