summaryrefslogtreecommitdiffstats
path: root/kernel/modules.pl
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/modules.pl')
-rw-r--r--kernel/modules.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/kernel/modules.pl b/kernel/modules.pl
index 68e6c4ab9..a6ad02fb3 100644
--- a/kernel/modules.pl
+++ b/kernel/modules.pl
@@ -213,8 +213,13 @@ sub get_main_modules() {
sub pci_modules4stage1 {
my ($category) = @_;
+ my @list = map { s/\.k?o.*$//; chomp_($_) } get_main_modules();
+ my %listed;
+ @listed{@list} = ();
my @modules = difference2([ category2modules($category) ], \@modules_removed_from_stage1);
- print "$_\n" foreach uniq(map { dependencies_closure($_) } @modules);
+ my ($kept, $rejected) = partition { exists $listed{$_} } @modules;
+ print STDERR "REJECTED @$rejected\n" if $verbose;
+ print "$_\n" foreach uniq(map { dependencies_closure($_) } @$kept);
}
sub check() {