Bug 25409: Add missing "Required" text and "required" classes

[koha-ffzg.git] / reviews / reviewswaiting.pl

diff --git a/reviews/reviewswaiting.pl b/reviews/reviewswaiting.pl
index 452b54c..6dc51f1 100755 (executable)
--- a/reviews/reviewswaiting.pl
+++ b/reviews/reviewswaiting.pl
@@ -21,8 +21,9 @@ use CGI qw ( -utf8 );
 use C4::Auth;
 use C4::Output;
 use C4::Context;
-use C4::Members;
 use C4::Biblio;
+use Koha::Biblios;
+use Koha::Patrons;
 use Koha::Reviews;
 
 my $query = new CGI;
@@ -42,7 +43,7 @@ my $status   = $query->param('status') || 0;
 my $reviewid = $query->param('reviewid');
 my $page     = $query->param('page') || 1;
 my $count    = C4::Context->preference('numSearchResults') || 20;
-my $total    = Koha::Reviews->search({ approved => $status })->count;
+my $total    = Koha::Reviews->search_limited({ approved => $status })->count;
 
 if ( $op eq 'approve' ) {
     my $review = Koha::Reviews->find( $reviewid );
@@ -57,7 +58,7 @@ elsif ( $op eq 'delete' ) {
     $review->delete if $review;
 }
 
-my $reviews = Koha::Reviews->search(
+my $reviews = Koha::Reviews->search_limited(
     { approved => $status },
     {
         rows => $count,
@@ -66,14 +67,16 @@ my $reviews = Koha::Reviews->search(
     }
 )->unblessed;
 
-foreach ( @$reviews ) {
-    my $borrowernumber = $_->{borrowernumber};
-    my $borrowerData   = GetMember('borrowernumber' => $borrowernumber);
-    my $biblioData     = GetBiblioData($_->{biblionumber});
+for my $review ( @$reviews ) {
+    my $biblio         = Koha::Biblios->find( $review->{biblionumber} );
     # setting some borrower info into this hash
-    $_->{bibliotitle} = $biblioData->{'title'};
-    $_->{surname}     = $borrowerData->{'surname'};
-    $_->{firstname}   = $borrowerData->{'firstname'};
+    $review->{bibliotitle} = $biblio->title;
+
+    my $borrowernumber = $review->{borrowernumber};
+    my $patron = Koha::Patrons->find( $borrowernumber);
+    if ( $patron ) {
+        $review->{patron} = $patron;
+    }
 }
 
 my $url = "/cgi-bin/koha/reviews/reviewswaiting.pl?status=$status";