Lines 1656-1665
sub _koha_notify_reserve {
Link Here
|
1656 |
|
1656 |
|
1657 |
my $dbh = C4::Context->dbh; |
1657 |
my $dbh = C4::Context->dbh; |
1658 |
my $borrower = C4::Members::GetMember(borrowernumber => $borrowernumber); |
1658 |
my $borrower = C4::Members::GetMember(borrowernumber => $borrowernumber); |
|
|
1659 |
|
1660 |
# Try to get the borrower's email address |
1661 |
my $to_address; |
1662 |
my $which_address = C4::Context->preference('AutoEmailPrimaryAddress'); |
1663 |
# If the system preference is set to 'first valid' (value == OFF), look up email address |
1664 |
if ($which_address eq 'OFF') { |
1665 |
$to_address = C4::Members::GetFirstValidEmailAddress( $borrowernumber ); |
1666 |
} else { |
1667 |
$to_address = $borrower->{$which_address}; |
1668 |
} |
1669 |
|
1659 |
my $letter_code; |
1670 |
my $letter_code; |
1660 |
my $print_mode = 0; |
1671 |
my $print_mode = 0; |
1661 |
my $messagingprefs; |
1672 |
my $messagingprefs; |
1662 |
if ( $borrower->{'email'} || $borrower->{'smsalertnumber'} ) { |
1673 |
if ( $to_address || $borrower->{'smsalertnumber'} ) { |
1663 |
$messagingprefs = C4::Members::Messaging::GetMessagingPreferences( { borrowernumber => $borrowernumber, message_name => 'Hold Filled' } ); |
1674 |
$messagingprefs = C4::Members::Messaging::GetMessagingPreferences( { borrowernumber => $borrowernumber, message_name => 'Hold Filled' } ); |
1664 |
|
1675 |
|
1665 |
return if ( !defined( $messagingprefs->{'letter_code'} ) ); |
1676 |
return if ( !defined( $messagingprefs->{'letter_code'} ) ); |
1666 |
- |
|
|