From: Don Armstrong Date: Fri, 22 Jun 2007 13:33:29 +0000 (+0100) Subject: * Handle sourcepackage/version versions in service.in's found X-Git-Tag: release/2.6.0~537^2 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e7cac26fc5ff46f93aaad90dc9e26f192778d04a;p=debbugs.git * Handle sourcepackage/version versions in service.in's found --- diff --git a/scripts/service.in b/scripts/service.in index 66629746..97ccd3c1 100755 --- a/scripts/service.in +++ b/scripts/service.in @@ -559,10 +559,11 @@ END # than any version in which the bug is fixed or when # a bug is found and there is no fixed version if (defined $version) { + my ($version_only) = $version =~ m{([^/]+)$}; addfoundversions($data, $data->{package}, $version, 'binary'); my @fixed_order = sort {Debbugs::Versions::Dpkg::vercmp($a,$b);} - @{$data->{fixed_versions}}; - if (not @fixed_order or (Debbugs::Versions::Dpkg::vercmp($version,$fixed_order[-1]) >= 0)) { + map {s{.+/}{}; $_;} @{$data->{fixed_versions}}; + if (not @fixed_order or (Debbugs::Versions::Dpkg::vercmp($version_only,$fixed_order[-1]) >= 0)) { $data->{done} = ''; } } else {