summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTzafrir Cohen <tzafrir@cohens.org.il>2009-07-06 02:44:32 +0300
committerTzafrir Cohen <tzafrir@cohens.org.il>2009-07-06 02:44:32 +0300
commite94314ce191ddca5955d194a258a0f3e9c0dc909 (patch)
treea9e5a843bf760d5e5287af3997954cd970244cb6
parent2fcd9a89bdd60eef6052ec63d4950ea277c7383e (diff)
better reporing of unbuilt modules
Modules were reported as being "good" is they were "Avail"able. But for anything which is not a library, 'Avail' is not good enough. The module needs to also be Check-ed.
-rwxr-xr-xmenuselect/menuselect16
1 files changed, 12 insertions, 4 deletions
diff --git a/menuselect/menuselect b/menuselect/menuselect
index 2c171d0..792bfd5 100755
--- a/menuselect/menuselect
+++ b/menuselect/menuselect
@@ -585,6 +585,14 @@ sub fail_reason($) {
}
}
+sub item_used($) {
+ my $item = shift;
+ my $type = $item->{Type};
+
+ return $item->{Avail} if ($type eq 'lib');
+ return $item->{Checked};
+}
+
sub print_module_status {
my $flag_verbose = shift;
my $items = read_dump();
@@ -604,7 +612,7 @@ sub print_module_status {
my $item = $items->{$item_name};
if ($flag_verbose) {
printf "%s %-8s %-30s\n",
- (($item->{Avail})? 'Y':'n'),
+ (item_used($item)? 'Y':'n'),
$item->{Type},
$item->{Key};
if (!$item->{Avail}) {
@@ -614,17 +622,17 @@ sub print_module_status {
foreach (@{$item->{Depend}}) {
my $depmod = $items->{$_};
printf(" * %-12s ",$_);
- print (($depmod->{Avail})? '': "un");
+ print (item_used($depmod)? '': "un");
print "available\n";
}
} else {
printf "%s %-8s %-30s",
- (($item->{Avail})? 'Y':'n'),
+ (item_used($item)? 'Y':'n'),
$item->{Type},
$item->{Key};
foreach (@{$item->{Depend}}) {
my $depmod = $items->{$_};
- if ($depmod->{Avail}) {
+ if (item_used($depmod)) {
print "$_ ";
} else {
printf "[%s] ", $_;