Bug 25898: Prohibit indirect object notation

[srvgit] / opac / svc / shelfbrowser.pl

diff --git a/opac/svc/shelfbrowser.pl b/opac/svc/shelfbrowser.pl
index 2b24a0e..82e583c 100755 (executable)
--- a/opac/svc/shelfbrowser.pl
+++ b/opac/svc/shelfbrowser.pl
@@ -8,7 +8,7 @@ use C4::Context;
 use C4::Output;
 use C4::ShelfBrowser;
 
-my $cgi = new CGI;
+my $cgi = CGI->new;
 
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
     {