View | Details | Raw Unified | Return to bug 29046
Collapse All | Expand All

(-)a/Koha/Patron.pm (-2 / +10 lines)
Lines 1422-1428 Returns the empty string if the borrower has no email addresses. Link Here
1422
sub first_valid_email_address {
1422
sub first_valid_email_address {
1423
    my ($self) = @_;
1423
    my ($self) = @_;
1424
1424
1425
    return $self->email() || $self->emailpro() || $self->B_email() || q{};
1425
    my $email = q{};
1426
1427
    my @fields = split /\s*\|\s*/,
1428
      C4::Context->preference('EmailFieldPrecedence');
1429
    for my $field (@fields) {
1430
        $email = $self->$field;
1431
        last if ( $email ne q{} );
1432
    }
1433
1434
    return $email;
1426
}
1435
}
1427
1436
1428
=head3 get_club_enrollments
1437
=head3 get_club_enrollments
1429
- 

Return to bug 29046