diff options
Diffstat (limited to 't/rpmdb.t')
| -rw-r--r-- | t/rpmdb.t | 23 |
1 files changed, 13 insertions, 10 deletions
@@ -162,16 +162,19 @@ $db->traverse( sub { $errors++; } - my $expectedevr = $pkg->version . "-" . $pkg->release . ($pkg->distepoch ? ":" . $pkg->distepoch : ""); - if ($expectedevr ne $pkg->evr and "$epoch:$expectedevr" ne $pkg->evr and $pkg->name ne "gpg-pubkey") { - print "evr[" . $pkg->fullname . "]: $expectedevr != " . $pkg->evr . "\n"; - $errors++; - } - - my $expectedfullname = "$name-$version-$release" . ($disttag ? "-$disttag" : "") . ($distepoch ? $distepoch : "") . ($arch ? ".$arch" : ""); - if($pkg->fullname ne $expectedfullname) { - print "fullname: " . $pkg->fullname . " != $expectedfullname\n"; - $errors++; + if ($pkg->name eq "gpg-pubkey") { + + my $expectedevr = $pkg->version . "-" . $pkg->release . ($pkg->distepoch ? ":" . $pkg->distepoch : ""); + if ($expectedevr ne $pkg->evr and "$epoch:$expectedevr" ne $pkg->evr) { + print "evr[" . $pkg->fullname . "]: $expectedevr != " . $pkg->evr . "\n"; + $errors++; + } + + my $expectedfullname = "$name-$version-$release" . ($disttag ? "-$disttag" : "") . ($distepoch ? $distepoch : "") . ($arch ? ".$arch" : ""); + if($pkg->fullname ne $expectedfullname) { + print "fullname: " . $pkg->fullname . " != $expectedfullname\n"; + $errors++; + } } }); |