Adding check for the existence of a variable in
order to quiet errors in the log.
---
members/memberentry.pl | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/members/memberentry.pl b/members/memberentry.pl
index d169dbd..c047873 100755
--- a/members/memberentry.pl
+++ b/members/memberentry.pl
@@ -649,7 +649,7 @@ if (C4::Context->preference('uppercasesurnames')) {
}
$data{debarred} = C4::Overdues::CheckBorrowerDebarred($borrowernumber);
-$data{datedebarred} = $data{debarred} if ( $data{debarred} ne "9999-12-31" );
+$data{datedebarred} = $data{debarred} if ( $data{debarred} && $data{debarred}
ne "9999-12-31" );
foreach (qw(dateenrolled dateexpiry dateofbirth datedebarred)) {
$data{$_} = format_date($data{$_}); # back to syspref for display
$template->param( $_ => $data{$_});
--
1.7.3
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/
