Bug 25898: Prohibit indirect object notation

[srvgit] / patroncards / print.pl

diff --git a/patroncards/print.pl b/patroncards/print.pl
index 758afff..60cff0e 100755 (executable)
--- a/patroncards/print.pl
+++ b/patroncards/print.pl
@@ -27,7 +27,7 @@ use C4::Output qw(output_html_with_http_headers);
 use C4::Creators;
 use C4::Patroncards;
 
-my $cgi = new CGI;
+my $cgi = CGI->new;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
         template_name   => "patroncards/print.tt",