diff options
author | Olivier Blin <oblin@mandriva.org> | 2005-09-28 15:02:22 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2005-09-28 15:02:22 +0000 |
commit | 2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24 (patch) | |
tree | 1f54233eda489bf2123bf4b779cb51e7ae25475e | |
parent | f061c5ca27ad9855b6237c56026b3d803c663015 (diff) | |
download | drakx-2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24.tar drakx-2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24.tar.gz drakx-2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24.tar.bz2 drakx-2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24.tar.xz drakx-2e5c4782e6d6fa3c449f6e94b67518a57a0c1d24.zip |
split all_modules.tar listing in get_main_modules()
-rw-r--r-- | kernel/modules.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/kernel/modules.pl b/kernel/modules.pl index 4e24ef0c9..914cba374 100644 --- a/kernel/modules.pl +++ b/kernel/modules.pl @@ -205,6 +205,11 @@ sub make_modules_description { output("modules.description", @l); } +sub get_main_modules() { + my $main = chomp_(cat_('RPMS/.main')); + `tar tvf all.kernels/$main/all_modules.tar | awk '{ print \$6 }'` +} + sub pci_modules4stage1 { my ($category) = @_; my @modules = difference2([ category2modules($category) ], \@modules_removed_from_stage1); @@ -244,7 +249,7 @@ sub check() { print "$msg $_: ", join(" ", @{$not_listed{$_}}), "\n" foreach sort keys %not_listed; } }; - $not_listed->('NOT LISTED', 1, `tar tvf all.kernels/2.6*/all_modules.tar | awk '{ print \$6 }'`); + $not_listed->('NOT LISTED', 1, get_main_modules()); $not_listed->('not listed', $verbose, `rpm -qpl RPMS/kernel-*2.6*`); if (%deprecated_modules) { my %per_cat; |