Bug 31775: Show single library

[koha-ffzg.git] / opac / opac-review.pl

diff --git a/opac/opac-review.pl b/opac/opac-review.pl
index 6c0ac3e..12152d2 100755 (executable)
--- a/opac/opac-review.pl
+++ b/opac/opac-review.pl
@@ -19,19 +19,16 @@
 
 use Modern::Perl;
 use CGI qw ( -utf8 );
-use C4::Auth;
-use C4::Koha;
-use C4::Output;
-use C4::Biblio;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
 use C4::Scrubber;
-use C4::Debug;
 
 use Koha::Biblios;
-use Koha::DateUtils;
+use Koha::DateUtils qw( dt_from_string );
 use Koha::Review;
 use Koha::Reviews;
 
-my $query        = new CGI;
+my $query        = CGI->new;
 my $biblionumber = $query->param('biblionumber');
 my $review       = $query->param('review');
 my $reviewid     = $query->param('reviewid');
@@ -93,7 +90,6 @@ if( !@errors && defined $review ) {
        }
 }
 (@errors   ) and $template->param(   ERRORS=>\@errors);
-($cgi_debug) and $template->param(cgi_debug=>1       );
 $review = $clean;
 $review ||= $savedreview->review if $savedreview;
 $template->param(