summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/harddrake24
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index b38ce41d2..4437fa5e6 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -267,10 +267,10 @@ foreach (@harddrake::data::tree) {
if ($_->{bus} eq 'ide') {
$_->{channel} = $_->{channel} ? N("secondary") : N("primary");
delete $_->{info};
- } elsif ($_->{bus} !~ /USB|PCI/) {
+ } elsif ($_->{bus} && $_->{bus} !~ /USB|PCI/) {
# SCSI detection incoherency:
my $i = $_;
- $_->{bus_location} = join ':', map { sprintf("%lx", $i->{$_}) } qw(bus id);
+ $_->{bus_location} = join ':', map { sprintf("%lx", $i->{$_}) } qw(channel id lun);
}
harddrake::data::set_removable_configurator($Ident, $_, \$configurator);
if ($Ident eq "AUDIO") {