diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/youri-upload.in | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/bin/youri-upload.in b/bin/youri-upload.in index 374e301..c232cfb 100755 --- a/bin/youri-upload.in +++ b/bin/youri-upload.in @@ -264,16 +264,16 @@ exit(1) unless $ok; # create packages group my @packages_group; -foreach my $group ([ { }, \@ARGV ], @$pre_packages) { +foreach my $group ((map { [ { section => "", file => $_ } ] } @ARGV), @$pre_packages) { my @packages; - my ($opt, $pkg) = @$group; - foreach my $file (@$pkg) { + foreach my $opt (@$group) { + print "Preparing upload for $opt->{file}\n" if $verbose; push( @packages, create_instance( 'Youri::Package', class => $repository->get_package_class(), - file => $file, + file => $opt->{file}, %$opt ) ); |