* Handle sourcepackage/version versions in service.in's found

diff --git a/scripts/service.in b/scripts/service.in
index 66629746faa4ee5705a0ceab426b9f1229d44d57..97ccd3c125fc8e32c7b488ce8898137c9e5dc2c1 100755 (executable)
--- 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 {