aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xemi8
1 files changed, 2 insertions, 6 deletions
diff --git a/emi b/emi
index 790ec52..34e4165 100755
--- a/emi
+++ b/emi
@@ -28,16 +28,12 @@
# PREFIX : sprintf "$year%02d%02d%02d%02d%02d.$user.$host.${$}_", $mon, $mday, $hour, $min, $sec;
use strict;
-use File::Path qw(make_path);
-use Iurt::Config qw(config_usage config_init get_author_email get_mandatory_arch);
+use Iurt::Config qw(config_usage config_init);
use Iurt::Process qw(check_pid);
-use Iurt::Mail qw(sendmail);
use Iurt::Queue qw(get_upload_tree_state);
use Iurt::Util qw(plog_init plog);
use Iurt::Emi qw(find_prefixes_ready_to_upload upload_prefix_in_media);
-use Data::Dumper;
-use MDK::Common qw(cat_ if_ find touch);
-use MDK::Common::DataStructure qw(difference2);
+use MDK::Common qw(cat_ touch);
my %run;
my $program_name = 'emi';