From f2c0aa8a1758c467a9209ad530be8ef2b6a988a9 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 20 Jun 2004 23:26:10 +0000 Subject: remove old SCSI garbage code --- perl-install/standalone/harddrake2 | 4 ---- 1 file changed, 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 63854739c..16ee620a0 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -376,10 +376,6 @@ foreach (@classes) { if ($_->{bus} && $_->{bus} eq 'ide') { $_->{channel} = $_->{channel} ? N("secondary") : N("primary"); delete $_->{info}; - } elsif ($_->{bus} && $_->{bus} !~ /USB|PCI/) { - # SCSI detection incoherency: - my $i = $_; - $_->{bus_location} = join ':', map { sprintf("%lx", $i->{$_}) } qw(channel id lun); } if (defined $_->{capacity}) { my ($burner, $dvd) = (N("burner"), N("DVD")); -- cgit v1.2.1