Lines 86-95
for (qw(gonenoaddress lost borrowernotes is_debarred)) {
Link Here
|
86 |
$template->param( restriction_types => scalar Koha::Patron::Restriction::Types->search() ); |
86 |
$template->param( restriction_types => scalar Koha::Patron::Restriction::Types->search() ); |
87 |
|
87 |
|
88 |
if ( $patron->is_debarred ) { |
88 |
if ( $patron->is_debarred ) { |
|
|
89 |
my $restriction = $patron->restrictions->search->single; |
89 |
$template->param( |
90 |
$template->param( |
90 |
'userdebarred' => $patron->debarred, |
91 |
'userdebarred' => $patron->debarred, |
91 |
'debarredcomment' => $patron->debarredcomment, |
92 |
'debarredcomment' => $patron->debarredcomment, |
92 |
'debarredsince' => $patron->restrictions->search()->single->created, |
93 |
'debarredsince' => $restriction ? $restriction->single->created : undef, |
93 |
); |
94 |
); |
94 |
|
95 |
|
95 |
if ( $patron->debarred ne "9999-12-31" ) { |
96 |
if ( $patron->debarred ne "9999-12-31" ) { |
96 |
- |
|
|