X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FDB%2FLoad.pm;h=6f300f96f6690c07beb4764cb4c311141f181607;hb=5785a4bf6029d30f134046c9c154ea20c386cdaa;hp=77423a0017533aef54bc645af602dc9a5cf1e8d4;hpb=03a910261ca146c33c5a28f1ea6b351c4125c1b6;p=debbugs.git diff --git a/Debbugs/DB/Load.pm b/Debbugs/DB/Load.pm index 77423a0..6f300f9 100644 --- a/Debbugs/DB/Load.pm +++ b/Debbugs/DB/Load.pm @@ -123,8 +123,8 @@ sub load_bug { $queue = {}; } my %tags; - my $s_data = split_status_fields($data); - for my $tag (make_list($s_data->{keywords})) { + $data = split_status_fields($data); + for my $tag (make_list($data->{keywords})) { next unless defined $tag and length $tag; # this allows for invalid tags. But we'll use this to try to # find those bugs and clean them up @@ -457,7 +457,7 @@ sub load_debinfo { =back -=head Packages +=head2 Packages =over @@ -649,7 +649,7 @@ sub load_packages { =cut -=head Suites +=head2 Suites =over