write to bug closers in UTF-8

[debbugs.git] / examples / debian / postpa / 21bugclosers

diff --git a/examples/debian/postpa/21bugclosers b/examples/debian/postpa/21bugclosers
index 382b779de61ae51d3ab130eae54745134e463b39..dfcc44a30bbd8999c60cbe44bd2f8a5464853320 100755 (executable)
--- a/examples/debian/postpa/21bugclosers
+++ b/examples/debian/postpa/21bugclosers
@@ -39,6 +39,7 @@ my %bugclosers = count_bugs(function => sub {
 
 open BUGCLOSERS, '> /org/bugs.debian.org/www/stats/bugclosers.txt.new'
     or die "can't open bugclosers.txt.new: $!";
+binmode(BUGCLOSERS,':raw:encoding(UTF-8)');
 for my $closer (sort { $bugclosers{$a} <=> $bugclosers{$b} } keys %bugclosers) {
     printf BUGCLOSERS "%4d %s\n", $bugclosers{$closer}, $closer
        or die "can't write to bugclosers.txt.new: $!";