Changing version to 3.0.6

[koha.git] / reviews / reviewswaiting.pl

diff --git a/reviews/reviewswaiting.pl b/reviews/reviewswaiting.pl
index 4d4e456..9526a4c 100755 (executable)
--- a/reviews/reviewswaiting.pl
+++ b/reviews/reviewswaiting.pl
@@ -16,10 +16,11 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+use warnings;
+
 use CGI;
 use C4::Auth;
 use C4::Output;
-use C4::Interface::CGI::Output;
 use C4::Context;
 use C4::Review;
 use C4::Members;
@@ -32,12 +33,12 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
         query           => $query,
         type            => "intranet",
         authnotrequired => 0,
-        flagsrequired   => { catalogue => 1 },
+        flagsrequired   => { tools => 'moderate_comments' },
         debug           => 1,
     }
 );
 
-my $op       = $query->param('op');
+my $op       = $query->param('op') || '';
 my $reviewid = $query->param('reviewid');
 
 if ( $op eq 'approve' ) {
@@ -51,7 +52,7 @@ my $reviews = getallreviews(0);
 
 foreach ( @$reviews ) {
     my $borrowernumber = $_->{borrowernumber};
-    my $borrowerData   = GetMember('',$borrowernumber);
+    my $borrowerData   = GetMember($borrowernumber,'borrowernumber');
     my $biblioData     = GetBiblioData($_->{biblionumber});
     # setting some borrower info into this hash
     $_->{bibliotitle} = $biblioData->{'title'};