summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-06-24 10:05:27 +0000
committerOlivier Blin <oblin@mandriva.org>2004-06-24 10:05:27 +0000
commitb20f3f94b466e1271860d83b00d2f28ded6d056f (patch)
tree5c2981cbe20af247e17d1ffadee4bd8b6dc07561 /perl-install
parent6d2b23480d9913160afe8064006a234ed5963e6f (diff)
downloaddrakx-b20f3f94b466e1271860d83b00d2f28ded6d056f.tar
drakx-b20f3f94b466e1271860d83b00d2f28ded6d056f.tar.gz
drakx-b20f3f94b466e1271860d83b00d2f28ded6d056f.tar.bz2
drakx-b20f3f94b466e1271860d83b00d2f28ded6d056f.tar.xz
drakx-b20f3f94b466e1271860d83b00d2f28ded6d056f.zip
perl_checker compliance
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/modules.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 1f69c86cc..8f4c52d79 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -439,7 +439,7 @@ sub when_load {
eval { load('sd_mod') };
}
if ($category =~ /sound/) {
- my $sound_alias = find { /^sound-slot-[0-9]+$/ and $conf{$_}{alias} eq $name } keys %conf;
+ my $sound_alias = find { /^sound-slot-[0-9]+$/ && $conf{$_}{alias} eq $name } keys %conf;
$sound_alias ||= 'sound-slot-0';
add_alias($sound_alias, $name);
}