summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2005-08-25 16:02:51 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2005-08-25 16:02:51 +0000
commit27f0e4b2992f91f986237d578be592086951f189 (patch)
tree91e3c62f3da460640d3adfd38c2327670162404a /perl-install
parentc4016a940441713854c0a982e4f1ed7129bc0d4c (diff)
downloaddrakx-27f0e4b2992f91f986237d578be592086951f189.tar
drakx-27f0e4b2992f91f986237d578be592086951f189.tar.gz
drakx-27f0e4b2992f91f986237d578be592086951f189.tar.bz2
drakx-27f0e4b2992f91f986237d578be592086951f189.tar.xz
drakx-27f0e4b2992f91f986237d578be592086951f189.zip
(get_scsi_driver) kill dead variable
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/detect_devices.pm1
1 files changed, 0 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 77448b3f6..b6c9a7537 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -193,7 +193,6 @@ sub may_be_a_hd {
sub get_scsi_driver {
my (@l) = @_;
- my %host2driver = map { if_(m!.*/(.*)/(.*)!, $2, $1) } glob("/proc/scsi/*/*");
# find driver of host controller from sysfs:
foreach (@l) {
next if $_->{driver};