X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FBugs.pm;fp=Debbugs%2FBugs.pm;h=5879f724b5564cbb4e99ad9a6a70c9e939f992c6;hb=5f21369edc71c1fbcdfa33f5a40986ab63486eba;hp=09e19a881fd6d5ce554c10d201932526bdd0dd31;hpb=b4af4da62a98712c4ea78d251a503b217fd0c711;p=debbugs.git

diff --git a/Debbugs/Bugs.pm b/Debbugs/Bugs.pm
index 09e19a8..5879f72 100644
--- a/Debbugs/Bugs.pm
+++ b/Debbugs/Bugs.pm
@@ -560,6 +560,7 @@ sub get_bugs_by_db{
      }
      if (exists $param{affects}) {
 	 my @aff_list = make_list($param{affects});
+	 s/^src:// foreach @aff_list;
          $rs = $rs->search({-or => {'bin_pkg.pkg' =>
 				    [@aff_list],
 				    'src_pkg.pkg' =>
@@ -608,7 +609,7 @@ sub get_bugs_by_db{
 	 $rs = $rs->search({-or => {'bug_binpackages.bin_pkg' =>
 				   { -in => $bin_pkgs_rs->get_column('id')->as_query},
 				    'bug_srcpackages.src_pkg' => 
-				   { -in => $bin_pkgs_rs->get_column('id')->as_query},
+				   { -in => $src_pkgs_rs->get_column('id')->as_query},
 				   },
 			   },
 			  {join => ['bug_binpackages',
@@ -623,7 +624,8 @@ sub get_bugs_by_db{
 	     search({-or => [map {('me.pkg' => $_,
 				  )}
 			     make_list($param{src})],
-		     columns => ['id'],
+		    },
+		   { columns => ['id'],
 		     group_by => ['me.id'],
 		    },
 		   );
@@ -639,8 +641,8 @@ sub get_bugs_by_db{
 		   });
          $rs = $rs->search({-or => {'bug_binpackages.bin_pkg' =>
 				   { -in => $bin_pkgs_rs->get_column('id')->as_query},
-				    'bug_srcpackages.src_pkg' => 
-				   { -in => $bin_pkgs_rs->get_column('id')->as_query},
+				    'bug_srcpackages.src_pkg' =>
+				   { -in => $src_pkgs_rs->get_column('id')->as_query},
 				    'me.unknown_packages' =>
 				    [make_list($param{src})],
 				   },