From df62200965f1c8bc5b72762d588f6686bb6da83e Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 11 Apr 2018 15:48:30 -0700 Subject: [PATCH] include unknown packages in package search --- Debbugs/Bugs.pm | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/Debbugs/Bugs.pm b/Debbugs/Bugs.pm index 636c65d..6021712 100644 --- a/Debbugs/Bugs.pm +++ b/Debbugs/Bugs.pm @@ -506,10 +506,7 @@ sub get_bugs_by_db{ my $s = $param{schema}; my $keys = grep {$_ !~ $_non_search_key_regex} keys(%param); die "Need at least 1 key to search by" unless $keys; - my $rs = $param{schema}->resultset('Bug'); - if (exists $param{package}) { - $rs = $rs->search({-or => {map 'bin_package.'}}) - } + my $rs = $s->resultset('Bug'); if (exists $param{severity}) { $rs = $rs->search({'severity.severity' => [make_list($param{severity})], @@ -561,8 +558,10 @@ sub get_bugs_by_db{ ); } if (exists $param{package}) { - $rs = $rs->search({'bin_pkg.pkg' => - [make_list($param{package})], + $rs = $rs->search({-or => {'bin_pkg.pkg' => + [make_list($param{package})], + 'me.unknown.package' => + [make_list($param{package})]}, }, {join => {bug_binpackages => 'bin_pkg'}}); } -- 2.39.2