Lines 54-59
use Koha::AuthorisedValues;
Link Here
|
54 |
use Koha::CsvProfiles; |
54 |
use Koha::CsvProfiles; |
55 |
use Koha::Patron::Debarments qw(GetDebarments); |
55 |
use Koha::Patron::Debarments qw(GetDebarments); |
56 |
use Koha::Patron::Images; |
56 |
use Koha::Patron::Images; |
|
|
57 |
use Koha::Patron::Messages; |
57 |
use Module::Load; |
58 |
use Module::Load; |
58 |
if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preference('NorwegianPatronDBEnable') == 1 ) { |
59 |
if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preference('NorwegianPatronDBEnable') == 1 ) { |
59 |
load Koha::NorwegianPatronDB, qw( NLGetSyncDataFromBorrowernumber ); |
60 |
load Koha::NorwegianPatronDB, qw( NLGetSyncDataFromBorrowernumber ); |
Lines 331-336
if ( C4::Context->preference("ExportCircHistory") ) {
Link Here
|
331 |
$template->param(csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc' }) ]); |
332 |
$template->param(csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc' }) ]); |
332 |
} |
333 |
} |
333 |
|
334 |
|
|
|
335 |
my $messages = Koha::Patron::Messages->search( |
336 |
{ |
337 |
'me.borrowernumber' => $borrowernumber, |
338 |
}, |
339 |
{ |
340 |
join => 'manager', |
341 |
'+select' => ['manager.surname', 'manager.firstname' ], |
342 |
'+as' => ['manager_surname', 'manager_firstname'], |
343 |
} |
344 |
); |
345 |
|
346 |
|
334 |
# Display the language description instead of the code |
347 |
# Display the language description instead of the code |
335 |
# Note that this is certainly wrong |
348 |
# Note that this is certainly wrong |
336 |
my ( $subtag, $region ) = split '-', $patron->lang; |
349 |
my ( $subtag, $region ) = split '-', $patron->lang; |
Lines 359-364
$template->param(
Link Here
|
359 |
PatronsPerPage => C4::Context->preference("PatronsPerPage") || 20, |
372 |
PatronsPerPage => C4::Context->preference("PatronsPerPage") || 20, |
360 |
relatives_issues_count => $relatives_issues_count, |
373 |
relatives_issues_count => $relatives_issues_count, |
361 |
relatives_borrowernumbers => \@relatives, |
374 |
relatives_borrowernumbers => \@relatives, |
|
|
375 |
messages => $messages, |
362 |
); |
376 |
); |
363 |
|
377 |
|
364 |
output_html_with_http_headers $input, $cookie, $template->output; |
378 |
output_html_with_http_headers $input, $cookie, $template->output; |
365 |
- |
|
|