Lines 25-30
use C4::Auth qw( get_template_and_user );
Link Here
|
25 |
use C4::Output; |
25 |
use C4::Output; |
26 |
use C4::Letters; |
26 |
use C4::Letters; |
27 |
use Koha::Patron::Message; |
27 |
use Koha::Patron::Message; |
|
|
28 |
use Koha::Patrons; |
28 |
|
29 |
|
29 |
my $input = CGI->new; |
30 |
my $input = CGI->new; |
30 |
|
31 |
|
Lines 61-70
if ( $message_type eq 'E' ) {
Link Here
|
61 |
content => $borrower_message |
62 |
content => $borrower_message |
62 |
}; |
63 |
}; |
63 |
|
64 |
|
|
|
65 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
66 |
|
64 |
if ( $letter_code ) { |
67 |
if ( $letter_code ) { |
65 |
$letter = C4::Letters::GetPreparedLetter( |
68 |
$letter = C4::Letters::GetPreparedLetter( |
66 |
module => 'members', |
69 |
module => 'members', |
67 |
letter_code => $letter_code, |
70 |
letter_code => $letter_code, |
|
|
71 |
lang => $patron->lang, |
68 |
tables => { |
72 |
tables => { |
69 |
'borrowers' => $borrowernumber |
73 |
'borrowers' => $borrowernumber |
70 |
}, |
74 |
}, |
71 |
- |
|
|