diff options
Diffstat (limited to 'perl-install/network/smb.pm')
| -rw-r--r-- | perl-install/network/smb.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/smb.pm b/perl-install/network/smb.pm index 7adf01a3a..6215e3150 100644 --- a/perl-install/network/smb.pm +++ b/perl-install/network/smb.pm @@ -70,7 +70,7 @@ sub find_servers { my ($group, $name) = split(' ', lc($_)); # already done - next if grep { $group eq $_->{group} } values %servers; + next if any { $group eq $_->{group} } values %servers; $l{$name} = $group; } |