diff options
-rw-r--r-- | perl-install/harddrake/sound.pm | 9 | ||||
-rw-r--r-- | perl-install/harddrake/ui.pm | bin | 9932 -> 10255 bytes |
2 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index 2f235d711..59c0b68ba 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -151,7 +151,7 @@ sub switch { my $alternative = get_alternative($driver); if ($alternative) { my $new_driver = $alternative->[0]; - if ($new_driver eq "unknown") { + if ($new_driver eq 'unknown') { $in->ask_warn(_("No alternative driver"), _("There's no known OSS/ALSA alternative driver for your sound card (%s)", $device->{description})); @@ -165,6 +165,7 @@ sub switch { }, allow_empty_list => 1 } ])) { + return if ($new_driver eq $driver); standalone::explanations("switching audio driver from '$driver' to '$new_driver'\n"); do_switch($driver, $new_driver); } @@ -176,9 +177,9 @@ sub switch { $in->ask_warn(_("Unkown driver"), _("The \"%s\" driver for your sound card is unlisted\n Please send the output of the \"lspcidrake -v\" command to -Thierry Vignaud <tvignaud at mandrakesoft dot com> -with subject: unlisted sound driver") - , $driver); +<install at mandrakesoft dot com> +with subject: unlisted sound driver \"%s\"") + , $driver, $driver); } } diff --git a/perl-install/harddrake/ui.pm b/perl-install/harddrake/ui.pm Binary files differindex b7202a57b..24bd5c3ff 100644 --- a/perl-install/harddrake/ui.pm +++ b/perl-install/harddrake/ui.pm |