View | Details | Raw Unified | Return to bug 18538
Collapse All | Expand All

(-)a/opac/opac-user.pl (-2 / +2 lines)
Lines 93-99 my ( $borr ) = GetMember( borrowernumber => $borrowernumber ); Link Here
93
my (  $today_year,   $today_month,   $today_day) = Today();
93
my (  $today_year,   $today_month,   $today_day) = Today();
94
my ($warning_year, $warning_month, $warning_day) = split /-/, $borr->{'dateexpiry'};
94
my ($warning_year, $warning_month, $warning_day) = split /-/, $borr->{'dateexpiry'};
95
95
96
my $debar = Koha::Patrons->find( $borrowernumber )->is_debarred;
96
my $patron = Koha::Patrons->find( $borrowernumber );
97
my $debar  = $patron->is_debarred if $patron;
97
my $userdebarred;
98
my $userdebarred;
98
99
99
if ($debar) {
100
if ($debar) {
100
- 

Return to bug 18538