Bug 28759: limit accessibility for "Manage API keys"

[koha-ffzg.git] / tools / automatic_item_modification_by_age.pl

diff --git a/tools/automatic_item_modification_by_age.pl b/tools/automatic_item_modification_by_age.pl
index cd6a512..3693f31 100755 (executable)
--- a/tools/automatic_item_modification_by_age.pl
+++ b/tools/automatic_item_modification_by_age.pl
@@ -32,18 +32,17 @@ This script allows a user to update the new status for items.
 use Modern::Perl;
 
 use CGI;
-use JSON qw( to_json from_json );
+use JSON qw( to_json );
 
-use C4::Auth;
+use C4::Auth qw( get_template_and_user );
 use C4::Context;
-use C4::Items;
-use C4::Output;
+use C4::Output qw( output_html_with_http_headers );
 use C4::Koha;
 
 use Koha::Items;
 use Koha::Biblioitems;
 
-my $cgi = new CGI;
+my $cgi = CGI->new;
 
 # open template
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(