X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FStatus.pm;h=6fad22e5f2d6a04359546f41041a44161fd4378c;hb=ede5f340a093569596670be592d4aace355df05a;hp=7d72c032ec9b68c8678bca33acd2eacfd7707748;hpb=23d26116c0fcfeeaf60a7ab724f18fe86554d746;p=debbugs.git

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index 7d72c03..6fad22e 100644
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -655,7 +655,7 @@ sub makestatus {
 
 Writes the bug status and summary files out.
 
-Skips writting out a status file if minversion is 2
+Skips writing out a status file if minversion is 2
 
 Does not call bughook if disablebughook is true.
 
@@ -773,7 +773,7 @@ exactly are removed. Otherwise, all versions matching the version
 number are removed.
 
 Currently $package and $isbinary are entirely ignored, but accepted
-for backwards compatibilty.
+for backwards compatibility.
 
 =cut
 
@@ -1615,6 +1615,8 @@ sub update_realtime {
 	my $idx_new = IO::File->new($file.'.new','w')
 	     or die "Couldn't open ${file}.new: $!";
 
+        binmode($idx_old,':raw:utf8');
+        binmode($idx_new,':raw:encoding(UTF-8)');
 	my $min_bug = min(keys %bugs);
 	my $line;
 	my @line;