aboutsummaryrefslogtreecommitdiffstats
path: root/emi
diff options
context:
space:
mode:
Diffstat (limited to 'emi')
-rwxr-xr-xemi4
1 files changed, 2 insertions, 2 deletions
diff --git a/emi b/emi
index 1908504..6ba4d21 100755
--- a/emi
+++ b/emi
@@ -35,7 +35,7 @@ use Iurt::Mail qw(sendmail);
use Iurt::File qw(check_upload_tree);
use Iurt::Util qw(plog_init plog);
use Data::Dumper;
-use MDK::Common qw(cat_ if_);
+use MDK::Common qw(cat_ if_ touch);
use MDK::Common::DataStructure qw(difference2);
my %run;
@@ -323,7 +323,7 @@ foreach my $target (keys %targets) {
foreach my $prefix (@{$targets{$target}{$section}{to_upload}}) {
my $path = $pkg_tree{$prefix}{section}{$section}{path};
- open FOO, ">$done/$path/$prefix.upload" unless -f "$reject/$path/$prefix.youri";
+ touch("$done/$path/$prefix.upload") unless -f "$reject/$path/$prefix.youri";
}
}
}