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

(-)a/misc/cronjobs/overdue_notices.pl (-2 / +4 lines)
Lines 683-695 END_SQL Link Here
683
                        # email or sms is requested but not exist, do a print.
683
                        # email or sms is requested but not exist, do a print.
684
                        $effective_mtt = 'print';
684
                        $effective_mtt = 'print';
685
                    }
685
                    }
686
                    my @notice_items = @items;
687
                    splice @notice_items, $PrintNoticesMaxLines if $effective_mtt eq 'print' && scalar @notice_items > $PrintNoticesMaxLines;
688
                    #catch the case where we are sending a print to someone with an email
686
689
687
                    my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt ) ? 1 : 0;
690
                    my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt ) ? 1 : 0;
688
                    my $letter = parse_overdues_letter(
691
                    my $letter = parse_overdues_letter(
689
                        {   letter_code     => $overdue_rules->{"letter$i"},
692
                        {   letter_code     => $overdue_rules->{"letter$i"},
690
                            borrowernumber  => $borrowernumber,
693
                            borrowernumber  => $borrowernumber,
691
                            branchcode      => $branchcode,
694
                            branchcode      => $branchcode,
692
                            items           => \@items,
695
                            items           => \@notice_items,
693
                            substitute      => {    # this appears to be a hack to overcome incomplete features in this code.
696
                            substitute      => {    # this appears to be a hack to overcome incomplete features in this code.
694
                                                bib             => $library->branchname, # maybe 'bib' is a typo for 'lib<rary>'?
697
                                                bib             => $library->branchname, # maybe 'bib' is a typo for 'lib<rary>'?
695
                                                'items.content' => $titles,
698
                                                'items.content' => $titles,
696
- 

Return to bug 20937