diff options
| author | Florent Villard <warly@mandriva.com> | 2006-09-01 10:00:21 +0000 |
|---|---|---|
| committer | Florent Villard <warly@mandriva.com> | 2006-09-01 10:00:21 +0000 |
| commit | 47f5af098580e33c05c5d3d58740c3f7cca654ab (patch) | |
| tree | ef811c892d4c267d5e20490b0de77729f5f67ecd /lib/Youri/Repository | |
| parent | b3f693bdb0fa299356a07e7f293b399925c0f6a2 (diff) | |
| download | mga-youri-core-47f5af098580e33c05c5d3d58740c3f7cca654ab.tar mga-youri-core-47f5af098580e33c05c5d3d58740c3f7cca654ab.tar.gz mga-youri-core-47f5af098580e33c05c5d3d58740c3f7cca654ab.tar.bz2 mga-youri-core-47f5af098580e33c05c5d3d58740c3f7cca654ab.tar.xz mga-youri-core-47f5af098580e33c05c5d3d58740c3f7cca654ab.zip | |
fix bad package dir and search pattern
Diffstat (limited to 'lib/Youri/Repository')
| -rw-r--r-- | lib/Youri/Repository/Mandriva_upload_pre.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Youri/Repository/Mandriva_upload_pre.pm b/lib/Youri/Repository/Mandriva_upload_pre.pm index c755ea9..2132e9c 100644 --- a/lib/Youri/Repository/Mandriva_upload_pre.pm +++ b/lib/Youri/Repository/Mandriva_upload_pre.pm @@ -91,7 +91,7 @@ sub get_revisions { map { $self->get_package_class()->new(file => $_) } $self->get_files( $self->{_install_root}, - "$target/$arch/$dir/release" . $self->_get_section($package, $target, $define), + "$target/$arch/$dir/release" , $self->get_package_class()->get_pattern($package->get_name(),undef, undef, $package->get_arch()) ); } @@ -246,7 +246,7 @@ sub get_upload_newer_revisions { print "Looking for package $package revisions for $target in $self->{_upload_root} (pattern $pattern)\n"; my @packages; foreach my $dir ('cooker', 'contrib') { - find(sub { return if ! /$pattern/; print "Find $_\n"; push @packages, $File::Find::name if $package->compare($self->get_package_class()->new(file => $File::Find::name)) <= 0 }, "$self->{_upload_root}/$dir"); + find(sub { return if ! /^$pattern/; print "Find $_\n"; push @packages, $File::Find::name if $package->compare($self->get_package_class()->new(file => $File::Find::name)) <= 0 }, "$self->{_upload_root}/$dir"); } return @packages; |