summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--kernel/list_modules.pm10
1 files changed, 2 insertions, 8 deletions
diff --git a/kernel/list_modules.pm b/kernel/list_modules.pm
index 25022d95e..39d58a144 100644
--- a/kernel/list_modules.pm
+++ b/kernel/list_modules.pm
@@ -314,23 +314,17 @@ sub modname2filename {
$filenames{$_[0]};
}
-#- give module filenames, with '-' characters
-sub category2modules_raw {
+sub category2modules {
map {
my ($t1, $t2s) = m|(.*)/(.*)|;
my @sub = $t2s eq '*' ? keys %{$l{$t1}} : split('\|', $t2s);
map {
my $l = $l{$t1}{$_} or die "bad category $t1/$_\n" . backtrace();
- @$l;
+ map { filename2modname($_) } @$l;
} @sub;
} split(' ', $_[0]);
}
-#- give driver names, with '_' characters
-sub category2modules {
- map { filename2modname($_) } category2modules_raw(@_);
-}
-
sub all_modules() {
map { @$_ } map { values %$_ } values %l;
}