diff options
| author | Olivier Blin <oblin@mandriva.com> | 2007-08-20 20:11:19 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2007-08-20 20:11:19 +0000 |
| commit | 7fbad81c1334b8345e2e217cd8a48c31b40a9a81 (patch) | |
| tree | b285199cc3c402b8a3d800708449b79a38ab21d5 | |
| parent | ae27fffc818d31641520bca962af614845b0d8c3 (diff) | |
| download | drakx-7fbad81c1334b8345e2e217cd8a48c31b40a9a81.tar drakx-7fbad81c1334b8345e2e217cd8a48c31b40a9a81.tar.gz drakx-7fbad81c1334b8345e2e217cd8a48c31b40a9a81.tar.bz2 drakx-7fbad81c1334b8345e2e217cd8a48c31b40a9a81.tar.xz drakx-7fbad81c1334b8345e2e217cd8a48c31b40a9a81.zip | |
use category2modules_raw to get module filenames
| -rw-r--r-- | kernel/modules.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/kernel/modules.pl b/kernel/modules.pl index baccde635..6f9bfac50 100644 --- a/kernel/modules.pl +++ b/kernel/modules.pl @@ -16,7 +16,7 @@ sub flatten_and_check { map { my $category = $_; my @l = @{$h->{$category}}; - if (my @bad = difference2(\@l, [ category2modules($category) ])) { + if (my @bad = difference2(\@l, [ list_modules::category2modules_raw($category) ])) { foreach (@bad) { if (my $cat = module2category($_)) { warn "ERROR in modules.pl: module $_ is in category $cat, not in $category\n"; @@ -37,7 +37,7 @@ my ($f, @para) = @ARGV; $::{$f}->(@para); sub modules() { - map { category2modules($_) } split(' ', $images_cat); + map { list_modules::category2modules_raw($_) } split(' ', $images_cat); } sub remove_unneeded_modules { @@ -93,7 +93,7 @@ sub get_main_modules() { sub pci_modules4stage1 { my ($category) = @_; - my @modules = difference2([ category2modules($category) ]); + my @modules = difference2([ list_modules::category2modules_raw($category) ]); print "$_\n" foreach uniq(map { dependencies_closure($_) } @modules); } |