Bug 25898: Prohibit indirect object notation

[srvgit] / svc / letters / preview

diff --git a/svc/letters/preview b/svc/letters/preview
index 11c3d18..17d7ad8 100755 (executable)
--- a/svc/letters/preview
+++ b/svc/letters/preview
@@ -28,7 +28,7 @@ use Koha::Checkouts;
 use Koha::Items;
 use Koha::Patrons;
 
-my $input = new CGI;
+my $input = CGI->new;
 
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
     {