Bug 19809: Re-allow to call Koha::Objects::find in list context
[koha-ffzg.git] / members / ill-requests.pl
index fad46ea..911fc38 100755 (executable)
@@ -22,8 +22,6 @@ use Modern::Perl;
 use CGI qw ( -utf8 );
 use C4::Auth;
 use C4::Output;
-use C4::Members;
-use C4::Members::Attributes qw(GetBorrowerAttributes);
 use Koha::Patrons;
 
 my $input = new CGI;
@@ -41,11 +39,10 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
 
 my $borrowernumber = $input->param('borrowernumber');
 
-my $logged_in_user = Koha::Patrons->find( $loggedinuser ) or die "Not logged in";
+my $logged_in_user = Koha::Patrons->find( $loggedinuser );
 my $patron         = Koha::Patrons->find( $borrowernumber );
 output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } );
 
-my $category = $patron->category;
 $template->param(
     prefilters => "borrowernumber=$borrowernumber",
     patron => $patron,