Bug 23049: (QA follow-up) Correction for missed archived filter

[koha-ffzg.git] / members / readingrec.pl

diff --git a/members/readingrec.pl b/members/readingrec.pl
index 7a63201..7dd71f8 100755 (executable)
--- a/members/readingrec.pl
+++ b/members/readingrec.pl
@@ -29,7 +29,6 @@ use C4::Output;
 use C4::Members;
 use List::MoreUtils qw/any uniq/;
 use Koha::DateUtils;
-use C4::Members::Attributes qw(GetBorrowerAttributes);
 
 use Koha::Patrons;
 use Koha::Patron::Categories;
@@ -92,25 +91,10 @@ if ( $op eq 'export_barcodes' ) {
     }
 }
 
-my $category = $patron->category;
-if ( $category->category_type eq 'C') {
-    my $patron_categories = Koha::Patron::Categories->search_limited({ category_type => 'A' }, {order_by => ['categorycode']});
-    $template->param( 'CATCODE_MULTI' => 1) if $patron_categories->count > 1;
-    $template->param( 'catcode' => $patron_categories->next->categorycode )  if $patron_categories->count == 1;
-}
-
 if (! $limit){
        $limit = 'full';
 }
 
-if (C4::Context->preference('ExtendedPatronAttributes')) {
-    my $attributes = GetBorrowerAttributes($patron->borrowernumber);
-    $template->param(
-        ExtendedPatronAttributes => 1,
-        extendedattributes => $attributes
-    );
-}
-
 $template->param(
     patron            => $patron,
     readingrecordview => 1,