From 7bd5959701e5ebf89060cfe936055a6e3ed0fed6 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Mon, 20 Aug 2007 19:58:50 +0000
Subject: use '_' in modules names

---
 kernel/list_modules.pm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

(limited to 'kernel/list_modules.pm')

diff --git a/kernel/list_modules.pm b/kernel/list_modules.pm
index a5e0dac90..d37a5a585 100644
--- a/kernel/list_modules.pm
+++ b/kernel/list_modules.pm
@@ -299,7 +299,8 @@ sub dependencies_closure {
     (@l, $_[0]);
 }
 
-sub category2modules {
+#- give module filenames, with '-' characters
+sub category2modules_raw {
     map {
 	my ($t1, $t2s) = m|(.*)/(.*)|;
 	my @sub = $t2s eq '*' ? keys %{$l{$t1}} : split('\|', $t2s);
@@ -310,12 +311,18 @@ sub category2modules {
     } split(' ', $_[0]);
 }
 
+#- give driver names, with '_' characters
+sub category2modules {
+    map { s/-/_/g; $_ } category2modules_raw(@_);
+}
+
 sub all_modules() {
     map { @$_ } map { values %$_ } values %l;
 }
 
 sub module2category {
     my ($module) = @_;
+    $module =~ s/-/_/g;
     foreach my $t1 (keys %l) {
 	my $h = $l{$t1};
 	foreach my $t2 (keys %$h) {
-- 
cgit v1.2.1