use Pod::Usage;
use File::stat;
-use List::Util qw(min);
+use List::AllUtils qw(min);
use Debbugs::Common qw(make_list);
=over
-=itme B<--quick>
+=item B<--quick>
Only update changed bugs
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: $!";
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}));