Bug 3619 - C4::Letters::_send_message_by_email does not obey AutoEmailPrimaryAddress

This enhancement would cause C4::Letters::_send_message_by_email to obey the
syspref.

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
J. David Bavousett 2009-09-14 09:24:36 -04:00 committed by Galen Charlton
parent 04cafc1427
commit e2da272840
1 changed files with 3 additions and 1 deletions

View File

@ -821,7 +821,9 @@ sub _send_message_by_email ($;$$$) {
status => 'failed' } );
return;
}
unless ($to_address = $member->{email}) { # assigment, not comparison
my $which_address = C4::Context->preference('AutoEmailPrimaryAddress');
$to_address = $member->{$which_address};
unless ($to_address) {
# warn "FAIL: No 'to_address' and no email for " . ($member->{surname} ||'') . ", borrowernumber ($message->{borrowernumber})";
# warning too verbose for this more common case?
_set_message_status( { message_id => $message->{'message_id'},