diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-09-11 16:27:12 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-09-11 16:27:12 +0000 |
commit | 3a6829ded0f6b8d7ebdff8aec615b134e19b8943 (patch) | |
tree | 0b3f4d2c9bc9041866eef99c69175e062c5d02c4 /perl-install/detect_devices.pm | |
parent | 7f97982312bb72cfd186e3d9d9bf0bddffff99a3 (diff) | |
download | drakx-3a6829ded0f6b8d7ebdff8aec615b134e19b8943.tar drakx-3a6829ded0f6b8d7ebdff8aec615b134e19b8943.tar.gz drakx-3a6829ded0f6b8d7ebdff8aec615b134e19b8943.tar.bz2 drakx-3a6829ded0f6b8d7ebdff8aec615b134e19b8943.tar.xz drakx-3a6829ded0f6b8d7ebdff8aec615b134e19b8943.zip |
no_comment
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r-- | perl-install/detect_devices.pm | 15 |
1 files changed, 0 insertions, 15 deletions
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; } |