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

(-)a/Koha/Patron.pm (-2 / +10 lines)
Lines 1435-1441 Returns the empty string if the borrower has no email addresses. Link Here
1435
sub first_valid_email_address {
1435
sub first_valid_email_address {
1436
    my ($self) = @_;
1436
    my ($self) = @_;
1437
1437
1438
    return $self->email() || $self->emailpro() || $self->B_email() || q{};
1438
    my $email = q{};
1439
1440
    my @fields = split /\s*\|\s*/,
1441
      C4::Context->preference('EmailFieldPrecedence');
1442
    for my $field (@fields) {
1443
        $email = $self->$field;
1444
        last if ( $email ne q{} );
1445
    }
1446
1447
    return $email;
1439
}
1448
}
1440
1449
1441
=head3 get_club_enrollments
1450
=head3 get_club_enrollments
1442
- 

Return to bug 29046