From 455ed883318377df64ef1b9dc8a07fdf00650056 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 10 Sep 2020 09:42:58 +0200 Subject: [PATCH] Bug 26420: Use translated notices for overdue_notices.pl This script does not pass the patron's preferred lang for notices. Test plan: Enable TranslateNotices Create a patron with a preferred lang for notices != default Translate ODUE for this language Setup the overdue notices for this patron's category Check an item out for this patron (select the correct due date to trigger the notice) Run the script overdue_notices.pl Check the message_queue table and confirm that the notice enqueued is translated Signed-off-by: Martin Renvoize Signed-off-by: Katrin Fischer --- misc/cronjobs/overdue_notices.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl index 2d6a5bb397..01200d8435 100755 --- a/misc/cronjobs/overdue_notices.pl +++ b/misc/cronjobs/overdue_notices.pl @@ -598,7 +598,7 @@ END_SQL } } - my $letter = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode ); + my $letter = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, undef, $patron->lang ); unless ($letter) { $verbose and warn qq|Message '$overdue_rules->{"letter$i"}' content not found|; @@ -689,7 +689,7 @@ END_SQL splice @items, $PrintNoticesMaxLines if $effective_mtt eq 'print' && $PrintNoticesMaxLines && scalar @items > $PrintNoticesMaxLines; #catch the case where we are sending a print to someone with an email - my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt ) ? 1 : 0; + my $letter_exists = C4::Letters::getletter( 'circulation', $overdue_rules->{"letter$i"}, $branchcode, $effective_mtt, $patron->lang ) ? 1 : 0; my $letter = parse_overdues_letter( { letter_code => $overdue_rules->{"letter$i"}, borrowernumber => $borrowernumber, -- 2.11.0