The following commit has been merged in the master branch:
commit 964a01ae91db01eea6295526331106f32ee54576
Author: Niels Thykier <[email protected]>
Date: Tue Aug 30 23:21:34 2011 +0200
Used $info->relation instead of creating new relations
diff --git a/checks/fields b/checks/fields
index a9392dd..bf043a6 100644
--- a/checks/fields
+++ b/checks/fields
@@ -534,7 +534,7 @@ if ($type eq 'binary') {
if (($type eq 'binary') || ($type eq 'udeb')) {
my (%fields, %parsed);
my $javalib = 0;
- my $replaces = Lintian::Relation->new($info->field('replaces')//'');
+ my $replaces = $info->relation('replaces');
my %nag_once = ();
$javalib = 1 if($pkg =~ m/^lib.*-java$/o);
for my $field (qw(depends pre-depends recommends suggests conflicts
provides enhances replaces breaks)) {
diff --git a/checks/files b/checks/files
index ff0a0fe..928ac44 100644
--- a/checks/files
+++ b/checks/files
@@ -743,7 +743,7 @@ foreach my $file (@{$info->sorted_index}) {
$TRIPLETS = Lintian::Data->new('files/triplets', qr/\s++/o)
unless defined($TRIPLETS);
if ($TRIPLETS->known($subdir) && $info->field('architecture') eq
$TRIPLETS->value($subdir)) {
- my $dep = Lintian::Relation->new($info->field('pre-depends')//'');
+ my $dep = $info->relation('pre-depends');
tag 'missing-pre-dependency-on-multiarch-support' unless
($dep->implies('multiarch-support'));
}
}
@@ -863,7 +863,7 @@ foreach my $file (@{$info->sorted_index}) {
# ---------------- pyshared-data
if ($file =~ m,^usr/share/pyshared-data/$tmp$,){
- my $dep = Lintian::Relation->new($info->field('depends')//'');
+ my $dep = $info->relation('depends');
tag 'missing-dependency-on-python-central' unless
($dep->implies('python-central (>= 0.6)'));
}
@@ -1314,7 +1314,7 @@ if (defined($py_support_nver) && $pkg ne
'python-support'){
# We also skip debug packages since they are okay as long as
# foo-dbg depends on foo (= $version) and foo has its dependency
# correct.
- my $dep = Lintian::Relation->new($info->field('depends')//'');
+ my $dep = $info->relation('depends');
tag 'missing-dependency-on-python-support', "python-support
$py_support_nver"
unless ($pkg =~ m/-dbg$/ || $dep->implies("python-support
$py_support_nver"));
}
--
Debian package checker
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
Archive: http://lists.debian.org/[email protected]
