From d1c9e4df65e46524673d8ddcbab1b687fb1db78b Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 2 Dec 2008 08:37:03 -0800
Subject: [PATCH] support selecting src:sourcepackage packages in Debbugs::Bugs

---
 Debbugs/Bugs.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/Debbugs/Bugs.pm b/Debbugs/Bugs.pm
index dfcb0c5..f7a6fbb 100644
--- a/Debbugs/Bugs.pm
+++ b/Debbugs/Bugs.pm
@@ -711,10 +711,14 @@ sub __handle_pkg_src_and_maint{
 	  # We only want to increment the number of keys if there is
 	  # something to match
 	  my $key_inc = 0;
-	  for my $package ((map { getsrcpkgs($_)} make_list($param{src})),make_list($param{src})) {
+	  for my $package ((map { getsrcpkgs($_)} make_list($param{src}))) {
 	       $packages{$package}++;
 	       $key_inc=1;
 	  }
+	  for my $package (make_list($param{src})) {
+	       $packages{"src:$package"}++;
+	       $key_inc=1;
+	  }
 	  $package_keys += $key_inc;
      }
      if (exists $param{maint}) {
-- 
2.39.2