Bug 17600: Standardize our EXPORT_OK

[srvgit] / misc / cronjobs / archive_purchase_suggestions.pl

diff --git a/misc/cronjobs/archive_purchase_suggestions.pl b/misc/cronjobs/archive_purchase_suggestions.pl
index bd16600..a7c3e88 100755 (executable)
--- a/misc/cronjobs/archive_purchase_suggestions.pl
+++ b/misc/cronjobs/archive_purchase_suggestions.pl
@@ -2,14 +2,14 @@
 
 use Modern::Perl;
 
-use Pod::Usage;
-use Getopt::Long;
+use Pod::Usage qw( pod2usage );
+use Getopt::Long qw( GetOptions );
 
 use Koha::Script -cron;
 
 use Koha::DateUtils qw( dt_from_string output_pref );
 use Koha::Suggestions;
-use C4::Koha;
+use C4::Koha qw( GetAuthorisedValues );
 
 my ( $help, $verbose, $confirm, $age, $age_date_field, @statuses );
 GetOptions(