Просмотр исходного кода

Dpkg::Changelog::find_closes(): don't return duplicate bug numbers

Ensure we don't return the same bug multiple times even if it's closed
multiple times.
Raphaël Hertzog лет назад: 16
Родитель
Сommit
a8a51a4a53
1 измененных файлов с 3 добавлено и 3 удалено
  1. 3 3
      scripts/Dpkg/Changelog.pm

+ 3 - 3
scripts/Dpkg/Changelog.pm

@@ -719,14 +719,14 @@ numbers in an array reference.
 
 sub find_closes {
     my $changes = shift;
-    my @closes = ();
+    my %closes;
 
     while ($changes &&
 	   ($changes =~ /closes:\s*(?:bug)?\#?\s?\d+(?:,\s*(?:bug)?\#?\s?\d+)*/ig)) {
-	push(@closes, $& =~ /\#?\s?(\d+)/g);
+	$closes{$_} = 1 foreach($& =~ /\#?\s?(\d+)/g);
     }
 
-    @closes = sort { $a <=> $b } @closes;
+    my @closes = sort { $a <=> $b } keys %closes;
     return \@closes;
 }