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

(-)a/Koha/Patron.pm (-5 / +7 lines)
Lines 1841-1850 sub queue_notice { Link Here
1841
    my $print_sent = 0;
1841
    my $print_sent = 0;
1842
    my %return;
1842
    my %return;
1843
    foreach my $mtt (@message_transports){
1843
    foreach my $mtt (@message_transports){
1844
        next if ($mtt eq 'phone' and C4::Context->preference('TalkingTechItivaPhoneNotification') );
1844
        next if ($mtt eq 'itiva' and C4::Context->preference('TalkingTechItivaPhoneNotification') );
1845
        # Phone notices are handled by TalkingTech_itiva_outbound.pl
1845
        # Notice is handled by TalkingTech_itiva_outbound.pl
1846
        if( ($mtt eq 'email' and not $self->notice_email_address) or ($mtt eq 'sms' and not $self->smsalertnumber) ){
1846
        if (   ( $mtt eq 'email' and not $self->notice_email_address )
1847
            push @{$return{fallback}}, $mtt;
1847
            or ( $mtt eq 'sms'   and not $self->smsalertnumber )
1848
            or ( $mtt eq 'phone' and not $self->phone ) )
1849
        {
1850
            push @{ $return{fallback} }, $mtt;
1848
            $mtt = 'print';
1851
            $mtt = 'print';
1849
        }
1852
        }
1850
        next if $mtt eq 'print' && $print_sent;
1853
        next if $mtt eq 'print' && $print_sent;
1851
- 

Return to bug 15986