aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorMandrake <mandrake@mandriva.com>2006-09-12 12:40:13 +0000
committerMandrake <mandrake@mandriva.com>2006-09-12 12:40:13 +0000
commitcd25d6da365fb0a4ca794c640dba7e0593f5c0d1 (patch)
tree2538b284fac1fdbafe523274c15a3006bf31feed /lib
parent69a04368d1d55738fb7bc3af335dd7bee7a1bfac (diff)
downloadmga-youri-core-cd25d6da365fb0a4ca794c640dba7e0593f5c0d1.tar
mga-youri-core-cd25d6da365fb0a4ca794c640dba7e0593f5c0d1.tar.gz
mga-youri-core-cd25d6da365fb0a4ca794c640dba7e0593f5c0d1.tar.bz2
mga-youri-core-cd25d6da365fb0a4ca794c640dba7e0593f5c0d1.tar.xz
mga-youri-core-cd25d6da365fb0a4ca794c640dba7e0593f5c0d1.zip
fix bad section gessing when archiving
Diffstat (limited to 'lib')
-rw-r--r--lib/Youri/Upload/Action/Archive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Youri/Upload/Action/Archive.pm b/lib/Youri/Upload/Action/Archive.pm
index 3626d88..d16deeb 100644
--- a/lib/Youri/Upload/Action/Archive.pm
+++ b/lib/Youri/Upload/Action/Archive.pm
@@ -43,9 +43,9 @@ sub run {
$repository->get_replaced_packages($package, $target, $define)
) {
my $file = $replaced_package->get_file();
- my ($rep_section, $rep_main_section) = $file =~ m,$path(([^/]+)/.*)/[^/]+.rpm,;
+ my ($rep_section, $rep_main_section) = $file =~ m,$path/(([^/]+)/.*)/[^/]+.rpm,;
# We do accept duplicate version for other submedia of the same main media section
- print "file $file section $rep_section main_section $rep_main_section ($path)\n" if $self->{_verbose};
+ print "(path $path) file $file section $rep_section main_section $rep_main_section ($path)\n" if $self->{_verbose};
next if $rep_main_section eq $main_section && $rep_section ne $section;
my $dest = $repository->get_archive_dir($package, $target, $define);