@@ -, +, @@ --- labels/label-edit-layout.pl | 2 +- misc/bin/connexion_import_daemon.pl | 2 +- misc/cronjobs/rss/rss.pl | 2 +- misc/migration_tools/22_to_30/export_Authorities.pl | 2 +- misc/migration_tools/22_to_30/export_Authorities_xml.pl | 2 +- misc/translator/xgettext.pl | 2 +- 6 files changed, 6 insertions(+), 6 deletions(-) --- a/labels/label-edit-layout.pl +++ a/labels/label-edit-layout.pl @@ -21,7 +21,7 @@ use Modern::Perl; use CGI qw ( -utf8 ); -use POSIX qw( exit sprintf ); +use POSIX; use C4::Auth qw( get_template_and_user ); use C4::Output qw( output_html_with_http_headers ); --- a/misc/bin/connexion_import_daemon.pl +++ a/misc/bin/connexion_import_daemon.pl @@ -90,7 +90,7 @@ use Carp qw( croak ); use IO::Socket::INET qw( SOCK_STREAM ); # use IO::Socket::IP; use IO::Select; -use POSIX qw( close exit fork localtime open printf sprintf ); +use POSIX; use HTTP::Status qw( HTTP_FORBIDDEN HTTP_UNAUTHORIZED ); use strict; use warnings; --- a/misc/cronjobs/rss/rss.pl +++ a/misc/cronjobs/rss/rss.pl @@ -31,7 +31,7 @@ use Template; use Koha::Script -cron; use C4::Context; -use POSIX qw( close localtime open strftime ); +use POSIX; my $dbh = C4::Context->dbh; my $file = $ARGV[0]; --- a/misc/migration_tools/22_to_30/export_Authorities.pl +++ a/misc/migration_tools/22_to_30/export_Authorities.pl @@ -10,7 +10,7 @@ use C4::Context; #use MARC::File::XML(BinaryEncoding=>"utf8"); #use MARC::File::USMARC; use C4::AuthoritiesMarc; -use POSIX qw( close localtime sprintf time ); +use POSIX; #MARC::File::XML::default_record_format("UNIMARCAUTH"); my $dbh = C4::Context->dbh; my $rq= $dbh->prepare(qq| --- a/misc/migration_tools/22_to_30/export_Authorities_xml.pl +++ a/misc/migration_tools/22_to_30/export_Authorities_xml.pl @@ -9,7 +9,7 @@ BEGIN { use C4::Context; use MARC::File::XML(BinaryEncoding=>"utf8"); use C4::AuthoritiesMarc; -use POSIX qw( close localtime open sprintf time ); +use POSIX; MARC::File::XML::default_record_format("UNIMARCAUTH"); my $dbh = C4::Context->dbh; my $rq= $dbh->prepare(qq| --- a/misc/translator/xgettext.pl +++ a/misc/translator/xgettext.pl @@ -27,7 +27,7 @@ use lib $FindBin::Bin; use strict; use warnings; use Getopt::Long qw( GetOptions ); -use POSIX qw( close exit localtime open printf time ); +use POSIX; use Locale::PO; use TmplTokenizer; use VerboseWarnings; --