From: cjwatson <>
Date: Mon, 25 Jul 2005 01:01:52 +0000 (-0800)
Subject: [project @ 2005-07-24 18:01:52 by cjwatson]
X-Git-Tag: release/2.6.0~685
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=ac6710b78d56133557e9598872e68ff912332c41;p=debbugs.git

[project @ 2005-07-24 18:01:52 by cjwatson]
Fix 'found' to clear the done field if addfoundversions() cleared the most
recent version from fixed_versions, rather than trying to guess itself.
---

diff --git a/scripts/service.in b/scripts/service.in
index 0f1d9ade..f4b7554e 100755
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: service.in,v 1.105 2005/07/24 17:31:18 cjwatson Exp $
+# $Id: service.in,v 1.106 2005/07/24 18:01:52 cjwatson Exp $
 #
 # Usage: service <code>.nn
 # Temps:  incoming/P<code>.nn
@@ -374,7 +374,7 @@ END
                             (reverse @{$data->{fixed_versions}})[0];
                         # TODO: what if $data->{package} is a source package?
                         addfoundversions($data, $data->{package}, $version, 'binary');
-                        if (defined $lastfixed and $version eq $lastfixed) {
+                        if (defined $lastfixed and not grep { $_ eq $lastfixed } @{$data->{fixed_versions}}) {
                             $data->{done} = '';
                         }
                     } else {