aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mageia.org>2011-03-24 23:20:57 +0000
committerPascal Terjan <pterjan@mageia.org>2011-03-24 23:20:57 +0000
commited6a9183e6c78942dc11377c15366323ac08714f (patch)
tree838a007a1679bddceb442b7d269746ac281a2add /lib
parent3264befbb510b7ba72e516c404ad54d6361c2973 (diff)
downloadmga-youri-submit-ed6a9183e6c78942dc11377c15366323ac08714f.tar
mga-youri-submit-ed6a9183e6c78942dc11377c15366323ac08714f.tar.gz
mga-youri-submit-ed6a9183e6c78942dc11377c15366323ac08714f.tar.bz2
mga-youri-submit-ed6a9183e6c78942dc11377c15366323ac08714f.tar.xz
mga-youri-submit-ed6a9183e6c78942dc11377c15366323ac08714f.zip
Port to new Youri API
Diffstat (limited to 'lib')
-rw-r--r--lib/Youri/Submit/Check/Deps.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/Youri/Submit/Check/Deps.pm b/lib/Youri/Submit/Check/Deps.pm
index 3d5d235..0adcf37 100644
--- a/lib/Youri/Submit/Check/Deps.pm
+++ b/lib/Youri/Submit/Check/Deps.pm
@@ -29,16 +29,16 @@ sub resolvedep {
my $require = $_;
my $notfound = 1;
foreach my $provide (@provides) {
- next unless $provide->[Youri::Package::DEPENDENCY_NAME] eq $require->[Youri::Package::DEPENDENCY_NAME];
- if ($require->[Youri::Package::DEPENDENCY_RANGE]) {
- next unless $package->check_ranges_compatibility($provide->[Youri::Package::DEPENDENCY_RANGE], $require->[Youri::Package::DEPENDENCY_RANGE]);
+ next unless $provide->[Youri::Package::Relationship::NAME] eq $require->[Youri::Package::Relationship::NAME];
+ if ($require->[Youri::Package::Relationship::RANGE]) {
+ next unless $package->check_ranges_compatibility($provide->[Youri::Package::Relationship::RANGE], $require->[Youri::Package::Relationship::RANGE]);
}
$notfound = 0;
}
- if ($notfound && $require->[Youri::Package::DEPENDENCY_NAME] =~ m|/|) {
+ if ($notfound && $require->[Youri::Package::Relationship::NAME] =~ m|/|) {
foreach my $file ($package->get_files()) {
- next unless $file eq $require->[Youri::Package::DEPENDENCY_NAME];
+ next unless $file eq $require->[Youri::Package::Relationship::NAME];
$notfound = 0;
last;
}
@@ -48,7 +48,7 @@ sub resolvedep {
};
$media->traverse_headers($index);
foreach my $require (@requires) {
- push (@errors, "Unresolved dep on " . $require->[Youri::Package::DEPENDENCY_NAME] . " " . $require->[Youri::Package::DEPENDENCY_RANGE]);
+ push (@errors, "Unresolved dep on " . $require->[Youri::Package::Relationship::NAME] . " " . $require->[Youri::Package::Relationship::RANGE]);
}
return @errors;
}