From: Don Armstrong Date: Thu, 13 Sep 2018 02:47:08 +0000 (+0000) Subject: Merge branch 'patch-1' into 'master' X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=commitdiff_plain;h=342acf15c7b4c41f134874051613ef1b3becf956;hp=5ccf6f4092f0f41cccbbfb854e67e4212bab55e7 Merge branch 'patch-1' into 'master' make-britney-counts: Check return value of close See merge request debbugs-team/bugscan!1 --- diff --git a/make-britney-counts b/make-britney-counts index 955dc93..e541426 100755 --- a/make-britney-counts +++ b/make-britney-counts @@ -67,8 +67,10 @@ for my $pkg (sort keys %testingbugs) { print TESTING "$pkg ", scalar @{$testingbugs{$pkg}}, "\n"; print TESTINGNR "$pkg ", join(',', @{$testingbugs{$pkg}}), "\n"; } -close TESTING; -close TESTINGNR; +close TESTING + or die "close britney/testing.new: $!"; +close TESTINGNR + or die "close britney/testing-nr.new: $!"; open UNSTABLE, ">", "britney/unstable.new" or die "britney/unstable.new: $!"; @@ -78,8 +80,10 @@ for my $pkg (sort keys %unstablebugs) { print UNSTABLE "$pkg ", scalar @{$unstablebugs{$pkg}}, "\n"; print UNSTABLENR "$pkg ", join(',', @{$unstablebugs{$pkg}}), "\n"; } -close UNSTABLE; -close UNSTABLENR; +close UNSTABLE + or die "close britney/unstable.new: $!"; +close UNSTABLENR + or die "close britney/unstable-nr.new: $!"; rename "britney/testing.new", "britney/testing" or die "renaming britney/testing.new to britney/testing: $!";