From 020d69a01d2f6bad3c813bf73550389409846c4f Mon Sep 17 00:00:00 2001
From: Andreas Barth <aba@not.so.argh.org>
Date: Wed, 10 Mar 2010 15:44:13 +0000
Subject: [PATCH] add filter code for components

---
 bin/wanna-build           | 3 +++
 etc/yaml/wanna-build.yaml | 2 ++
 2 files changed, 5 insertions(+)

diff --git a/bin/wanna-build b/bin/wanna-build
index d1fc48e..f6634a2 100755
--- a/bin/wanna-build
+++ b/bin/wanna-build
@@ -1912,6 +1912,9 @@ sub list_packages {
 		push @list, calculate_prio($db->{$name});
 	}
 
+        # filter components
+        @list = grep { my $i = $_->{'component'}; grep { $i eq $_ } split /[, ]+/, $yamlmap->{"restrict"}{'component'} } @list;
+
 	foreach $pkg (sort sort_list_func @list) {
                 if ($printformat) {
                     print print_format($printformat, $pkg, {'cnt' => $cnt, 'scnt' => \%scnt})."\n";
diff --git a/etc/yaml/wanna-build.yaml b/etc/yaml/wanna-build.yaml
index eb56539..9d5f24d 100644
--- a/etc/yaml/wanna-build.yaml
+++ b/etc/yaml/wanna-build.yaml
@@ -25,3 +25,5 @@ list-order:
     failed: fPcpsn
     needs-build: CWn
     building: bn
+restrict:
+    component: main contrib
-- 
2.39.2