X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scripts%2Fgen-indices;h=1f0e7dfc9b75bf6c999df837a3c0615440cb5af5;hb=refs%2Fheads%2Fdebian;hp=0fe8ea82fcb577304cebacc374e385832e8ba6a3;hpb=7d96d08af28cfc7a0619146d9b232d6b7ced0cf7;p=debbugs.git

diff --git a/scripts/gen-indices b/scripts/gen-indices
index 0fe8ea8..1f0e7df 100755
--- a/scripts/gen-indices
+++ b/scripts/gen-indices
@@ -18,7 +18,7 @@ use Getopt::Long;
 use Pod::Usage;
 
 use File::stat;
-use List::Util qw(min);
+use List::AllUtils qw(min);
 
 use Debbugs::Common qw(make_list);
 
@@ -83,6 +83,7 @@ use Debbugs::Config qw(:config);
 use Debbugs::Common qw(getparsedaddrs getbugcomponent lockpid);
 use Debbugs::Status qw(readbug split_status_fields);
 use Debbugs::Log;
+use Debbugs::UTF8 qw(encode_utf8_structure);
 
 chdir($config{spool_dir}) or die "chdir $config{spool_dir} failed: $!";
 
@@ -198,7 +199,7 @@ while (my $dir = shift @dirs) {
 		     next;
 		}
 		next if $stat->mtime < $time;
-		my $fdata = split_status_fields(readbug($bug, $initialdir));
+		my ($fdata) = encode_utf8_structure(split_status_fields(readbug($bug, $initialdir)));
 		$modification_made = 1;
 		addbugtoindex("package", $bug, make_list($fdata->{package}));
 		addbugtoindex("tag", $bug, make_list($fdata->{keywords}));