From: Andreas Barth <aba@not.so.argh.org>
Date: Tue, 2 Mar 2010 17:45:50 +0000 (+0000)
Subject: calculate_prio: fix components: parse sections
X-Git-Url: https://git.donarmstrong.com/?p=wannabuild.git;a=commitdiff_plain;h=02cdf2dd3947cddf7bc1ca52ce2274a4abfea6b6

calculate_prio: fix components: parse sections
---

diff --git a/bin/wanna-build b/bin/wanna-build
index 63c94ba..7a7894d 100755
--- a/bin/wanna-build
+++ b/bin/wanna-build
@@ -1839,6 +1839,9 @@ sub sort_list_func {
 sub calculate_prio {
 	my $priomap = $yamlmap->{priority};
 	my $pkg = shift;
+        my @s=split("/", $pkg->{'section'});
+        $pkg->{'component'} = $s[0] if $s[1];
+        $pkg->{'component'} ||= 'main';
 	$pkg->{'calprio'} = 0;
 	foreach my $k (keys %{$priomap->{keys}}) {
 		$pkg->{'calprio'} += $priomap->{keys}->{$k}{$pkg->{$k}} if $pkg->{$k} and $priomap->{keys}->{$k}{$pkg->{$k}};