diff options
| author | Olivier Blin <oblin@mandriva.org> | 2004-06-24 10:05:27 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2004-06-24 10:05:27 +0000 |
| commit | b20f3f94b466e1271860d83b00d2f28ded6d056f (patch) | |
| tree | 5c2981cbe20af247e17d1ffadee4bd8b6dc07561 /perl-install | |
| parent | 6d2b23480d9913160afe8064006a234ed5963e6f (diff) | |
| download | drakx-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.pm | 2 |
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); } |