X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FDB%2FLoad.pm;h=040e2a77ab491d5f6290278117b47f5a718c7608;hb=a49cb351d4461ea6b757413efa8490da9339d4d6;hp=a85a4ec28eaaa97a3876c1c9258aebbe8d070a27;hpb=357003be59a9b14986f8686ef64f031767ad2d26;p=debbugs.git diff --git a/Debbugs/DB/Load.pm b/Debbugs/DB/Load.pm index a85a4ec..040e2a7 100644 --- a/Debbugs/DB/Load.pm +++ b/Debbugs/DB/Load.pm @@ -183,7 +183,9 @@ sub load_bug { $param{packages}, ); $b->set_related_packages('srcpackages', - [grep {defined $_ and + [map {s/src://; + $_} + grep {defined $_ and $_ =~ /^src:/} make_list($data->{package})], $param{packages}, @@ -196,7 +198,9 @@ sub load_bug { $param{packages}, ); $b->set_related_packages('affects_srcpackages', - [grep {defined $_ and + [map {s/src://; + $_} + grep {defined $_ and $_ =~ /^src:/} make_list($data->{affects})], $param{packages},