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