Bug 25898: Prohibit indirect object notation

[srvgit] / members / maninvoice.pl

diff --git a/members/maninvoice.pl b/members/maninvoice.pl
index 9ef1615..a178a2b 100755 (executable)
--- a/members/maninvoice.pl
+++ b/members/maninvoice.pl
@@ -42,7 +42,7 @@ use Koha::Old::Checkouts;
 use Koha::Patron::Categories;
 use Koha::Account::DebitTypes;
 
-my $input = new CGI;
+my $input = CGI->new;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
         template_name   => "members/maninvoice.tt",