From 2049843f1b1c700202891c8251c84a33ee68a3a8 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 7 Mar 2007 18:24:11 -0800 Subject: [PATCH] fix bug in bug_presence function --- Debbugs/Status.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm index 565daeb..d8afb57 100644 --- a/Debbugs/Status.pm +++ b/Debbugs/Status.pm @@ -737,7 +737,7 @@ sub get_bug_status { $status{"pending"} = 'fixed' if ($tags{fixed}); - my $presence = bug_presence(map{exists $param{$_}?($_,$param{$_}):()} + my $presence = bug_presence(map{(exists $param{$_})?($_,$param{$_}):()} qw(bug sourceversions arch dist version found fixed package) ); if (defined $presence) { @@ -838,21 +838,21 @@ sub bug_presence { else { @sourceversions = @{$param{sourceversions}}; } + my $maxbuggy = 'undef'; if (@sourceversions) { - my $maxbuggy = max_buggy(bug => $param{bug}, + $maxbuggy = max_buggy(bug => $param{bug}, sourceversions => \@sourceversions, found => $status{found_versions}, fixed => $status{fixed_versions}, package => $status{package}, version_cache => $version_cache, ); - return $maxbuggy; } if (length($status{done}) and (not @sourceversions or not @{$status{fixed_versions}})) { return 'fixed'; } - return undef; + return $maxbuggy; } -- 2.39.2