From 9a68bd7266672ca30196ac2338edd12a8e782d97 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 18 Oct 2005 17:17:52 +0000 Subject: perl_checko cleanup --- perl-install/harddrake/sound.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index f713d5aa8..5d1b2a81b 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -259,7 +259,7 @@ To use alsa, one can either use: help => join("\n\n", map { qq("$_": ) . $des{$_} } @alternative), allow_empty_list => 1, format => sub { my ($drv) = @_; - sprintf(($des{$drv} ? "$des{$drv} (%s [%s])" : "%s [%s]"), $drv, ($drv =~ /^snd[-_]/) ? 'ALSA' : 'OSS'); + sprintf(($des{$drv} ? "$des{$drv} (%s [%s])" : "%s [%s]"), $drv, $drv =~ /^snd[-_]/ ? 'ALSA' : 'OSS'); } }, { -- cgit v1.2.1