@@ -, +, @@ protected_letters --- C4/Overdues.pm | 5 +++-- tools/letter.pl | 5 +---- 2 files changed, 4 insertions(+), 6 deletions(-) --- a/C4/Overdues.pm +++ a/C4/Overdues.pm @@ -599,7 +599,7 @@ sub UpdateFine { } else { if ( $amount ) { # Don't add new fines with an amount of 0 my $patron = Koha::Patrons->find( $borrowernumber ); - my $desc = C4::Letters::GetPreparedLetter( + my $letter = eval { C4::Letters::GetPreparedLetter( module => 'circulation', letter_code => 'OVERDUE_FINE_DESC', message_transport_type => 'print', @@ -609,7 +609,8 @@ sub UpdateFine { borrowers => $borrowernumber, items => $itemnum, }, - )->{content}; + ) }; + my $desc = $letter ? $letter->{content} : "Item $itemnum - due $due"; my $account = Koha::Account->new({ patron_id => $borrowernumber }); $accountline = $account->add_debit( --- a/tools/letter.pl +++ a/tools/letter.pl @@ -56,10 +56,7 @@ use Koha::Patron::Attribute::Types; sub protected_letters { my $dbh = C4::Context->dbh; my $codes = $dbh->selectall_arrayref(q{SELECT DISTINCT letter_code FROM message_transports}); - return { - OVERDUE_FINE_DESC => 1, - map { $_->[0] => 1 } @{$codes} - }; + return { map { $_->[0] => 1 } @{$codes} }; } our $input = CGI->new; --