|
Lines 36-42
use C4::Form::MessagingPreferences;
Link Here
|
| 36 |
use List::MoreUtils qw( uniq ); |
36 |
use List::MoreUtils qw( uniq ); |
| 37 |
use Scalar::Util qw( looks_like_number ); |
37 |
use Scalar::Util qw( looks_like_number ); |
| 38 |
use Koha::Patron::Attribute::Types; |
38 |
use Koha::Patron::Attribute::Types; |
| 39 |
use Koha::Patron::Debarments qw( GetDebarments ); |
|
|
| 40 |
use Koha::Patron::Restriction::Types; |
39 |
use Koha::Patron::Restriction::Types; |
| 41 |
use Koha::Patron::Messages; |
40 |
use Koha::Patron::Messages; |
| 42 |
use Koha::CsvProfiles; |
41 |
use Koha::CsvProfiles; |
|
Lines 81-92
for (qw(gonenoaddress lost borrowernotes is_debarred)) {
Link Here
|
| 81 |
} |
80 |
} |
| 82 |
|
81 |
|
| 83 |
$template->param( |
82 |
$template->param( |
| 84 |
restriction_types => scalar Koha::Patron::Restriction::Types->keyed_on_code() |
83 |
restriction_types => scalar Koha::Patron::Restriction::Types->search() |
| 85 |
); |
84 |
); |
| 86 |
|
85 |
|
| 87 |
if ( $patron->is_debarred ) { |
86 |
if ( $patron->is_debarred ) { |
| 88 |
$template->param( |
87 |
$template->param( |
| 89 |
'debarments' => scalar GetDebarments({ borrowernumber => $borrowernumber }), |
|
|
| 90 |
'userdebarred' => $patron->debarred, |
88 |
'userdebarred' => $patron->debarred, |
| 91 |
'debarredcomment' => $patron->debarredcomment, |
89 |
'debarredcomment' => $patron->debarredcomment, |
| 92 |
); |
90 |
); |
|
Lines 281-287
$template->param(
Link Here
|
| 281 |
relatives_borrowernumbers => \@relatives, |
279 |
relatives_borrowernumbers => \@relatives, |
| 282 |
logged_in_user => $logged_in_user, |
280 |
logged_in_user => $logged_in_user, |
| 283 |
files => Koha::Patron::Files->new( borrowernumber => $borrowernumber ) ->GetFilesInfo(), |
281 |
files => Koha::Patron::Files->new( borrowernumber => $borrowernumber ) ->GetFilesInfo(), |
| 284 |
#debarments => scalar GetDebarments({ borrowernumber => $borrowernumber }), |
|
|
| 285 |
has_modifications => $has_modifications, |
282 |
has_modifications => $has_modifications, |
| 286 |
); |
283 |
); |
| 287 |
|
284 |
|
| 288 |
- |
|
|