# Suite 330, Boston, MA 02111-1307 USA
use strict;
+use warnings;
+
use CGI;
use C4::Auth;
use C4::Output;
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' ) {
foreach ( @$reviews ) {
my $borrowernumber = $_->{borrowernumber};
- my $borrowerData = GetMember($borrowernumber,'borrowernumber');
+ my $borrowerData = GetMember('borrowernumber' => $borrowernumber);
my $biblioData = GetBiblioData($_->{biblionumber});
# setting some borrower info into this hash
$_->{bibliotitle} = $biblioData->{'title'};