21bugclosers does not need common.pl

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

diff --git a/examples/debian/postpa/21bugclosers b/examples/debian/postpa/21bugclosers
index 382b779de61ae51d3ab130eae54745134e463b39..014888121cec9372dc94bb87df1e38f62305f45d 100755 (executable)
--- a/examples/debian/postpa/21bugclosers
+++ b/examples/debian/postpa/21bugclosers
@@ -8,8 +8,6 @@ use Debbugs::Config qw(:globals);
 use Debbugs::Bugs qw(count_bugs);
 use Debbugs::Status qw(get_bug_status);
 
-require '/org/bugs.debian.org/cgi-bin/common.pl';
-
 package main;
 
 my $startdate = time;
@@ -39,6 +37,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: $!";