diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/harddrake/sound.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index 4bbe45e93..a72887a38 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -257,7 +257,10 @@ To use alsa, one can either use: { label => N("Driver:"), val => \$new_driver, list => \@alternative, default => $new_driver, sort =>1, help => join("\n\n", map { qq("$_": ) . $des{$_} } @alternative), - allow_empty_list => 1, format => sub { my ($drv) = @_; ($drv =~ /^snd[-_]/) ? "$drv [ALSA]" : "$drv [OSS]" } + allow_empty_list => 1, + format => sub { my ($drv) = @_; + sprintf(($des{$drv} ? "$des{$drv} (%s)" : "%s"), ($drv =~ /^snd[-_]/) ? "$drv [ALSA]" : "$drv [OSS]"); + } }, { val => N("Trouble shooting"), disabled => sub {}, |