Bug 12461 - Add patron clubs feature
[koha.git] / Koha / Template / Plugin / Borrowers.pm
index 44c76fc..327431b 100644 (file)
@@ -22,8 +22,8 @@ use Modern::Perl;
 
 use base qw( Template::Plugin );
 
-use Koha::Borrower::Debarments qw();
-use C4::Members qw();
+use Koha::Patron::Debarments qw();
+use Koha::Patrons;
 
 =pod
 
@@ -46,7 +46,7 @@ sub IsDebarred {
 
     return unless $borrower;
 
-    return Koha::Borrower::Debarments::IsDebarred($borrower->{borrowernumber});
+    return Koha::Patrons->find( $borrower->{borrowernumber} )->is_debarred;
 }
 
 sub HasOverdues {
@@ -54,8 +54,7 @@ sub HasOverdues {
 
     return unless $borrowernumber;
 
-    return C4::Members::HasOverdues($borrowernumber);
+    return Koha::Patrons->find( $borrowernumber )->has_overdues;
 }
 
-
 1;