From 3a6829ded0f6b8d7ebdff8aec615b134e19b8943 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Sep 2000 16:27:12 +0000
Subject: no_comment

---
 perl-install/detect_devices.pm | 15 ---------------
 1 file changed, 15 deletions(-)

(limited to 'perl-install/detect_devices.pm')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 6bcf38ac6..b8bad956c 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -158,21 +158,6 @@ sub getDAC960() {
     values %idi;
 }
 
-sub net2module() {
-    my @modules = map { quotemeta first(split) } cat_("/proc/modules");
-    my $modules = join '|', @modules;
-    my $net     = join '|', @netdevices;
-    my ($module, %l);
-    foreach (syslog()) {
-	if (/^($modules)\.c:/) {
-	    $module = $1;
-	} elsif (/^($net):/) {
-	    $l{$1} = $module if $module;
-	}
-    }
-    %l;
-}
-
 sub getNet() {
     grep { hasNetDevice($_) } @netdevices;
 }
-- 
cgit v1.2.1