diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/devices.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_interactive.pm | 2 | ||||
| -rw-r--r-- | perl-install/modules.pm | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/devices.pm b/perl-install/devices.pm index 6b7e1edd4..0e4f1c671 100644 --- a/perl-install/devices.pm +++ b/perl-install/devices.pm @@ -84,7 +84,7 @@ sub entry { @{ ${{"fd" => [ c::S_IFBLK(), 2, 0 ], "hidbp-mse-" => [ c::S_IFCHR(), 10, 32 ], "lp" => [ c::S_IFCHR(), 6, 0 ], - "usb/usblp" => [ c::S_IFCHR(), 180, 0 ], + "usb/lp" => [ c::S_IFCHR(), 180, 0 ], "loop" => [ c::S_IFBLK(), 7, 0 ], "md" => [ c::S_IFBLK(), 9, 0 ], "nst" => [ c::S_IFCHR(), 9, 128], diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm index 6e60b8f6f..796402eb9 100644 --- a/perl-install/install_interactive.pm +++ b/perl-install/install_interactive.pm @@ -299,7 +299,7 @@ sub setup_thiskind { } return if $auto && (@l || !$at_least_one); } - @l = map { $_->{driver} } @l; + @l = map { $_->{description} } @l; while (1) { my $msg = @l ? [ _("Found %s %s interfaces", join(", ", @l), $type), diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 5f6de00f8..6bc3ac812 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -350,7 +350,7 @@ sub add_alias($$) { $alias .= $scsi++ || '' if $alias eq 'scsi_hostadapter'; log::l("adding alias $alias to $name"); $conf{$alias}{alias} ||= $name; - if ($alias eq "sound" && $name =~ /^snd-card-/) { + if ($name =~ /^snd-card-/) { $conf{$name}{"post-install"} = "modprobe snd-pcm-oss"; } $alias; |