|
Lines 598-604
END_SQL
Link Here
|
| 598 |
} |
598 |
} |
| 599 |
} |
599 |
} |
| 600 |
|
600 |
|
| 601 |
my $letter = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode ); |
601 |
my $letter = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, undef, $patron->lang ); |
| 602 |
|
602 |
|
| 603 |
unless ($letter) { |
603 |
unless ($letter) { |
| 604 |
$verbose and warn qq|Message '$overdue_rules->{"letter$i"}' content not found|; |
604 |
$verbose and warn qq|Message '$overdue_rules->{"letter$i"}' content not found|; |
|
Lines 689-695
END_SQL
Link Here
|
| 689 |
splice @items, $PrintNoticesMaxLines if $effective_mtt eq 'print' && $PrintNoticesMaxLines && scalar @items > $PrintNoticesMaxLines; |
689 |
splice @items, $PrintNoticesMaxLines if $effective_mtt eq 'print' && $PrintNoticesMaxLines && scalar @items > $PrintNoticesMaxLines; |
| 690 |
#catch the case where we are sending a print to someone with an email |
690 |
#catch the case where we are sending a print to someone with an email |
| 691 |
|
691 |
|
| 692 |
my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt ) ? 1 : 0; |
692 |
my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt, $patron->lang ) ? 1 : 0; |
| 693 |
my $letter = parse_overdues_letter( |
693 |
my $letter = parse_overdues_letter( |
| 694 |
{ letter_code => $overdue_rules->{"letter$i"}, |
694 |
{ letter_code => $overdue_rules->{"letter$i"}, |
| 695 |
borrowernumber => $borrowernumber, |
695 |
borrowernumber => $borrowernumber, |
| 696 |
- |
|
|