diff options
author | Pascal Terjan <pterjan@mandriva.org> | 2009-07-27 06:26:03 +0000 |
---|---|---|
committer | Pascal Terjan <pterjan@mandriva.org> | 2009-07-27 06:26:03 +0000 |
commit | 1c71fda8b71e1e2befad768906b8b5e2465a9ca6 (patch) | |
tree | a8c24363bb39d65e19c5076f9c457b78706b97b9 /perl-install/fs | |
parent | 3ee8b0b2c54ff6f732fb607ac9dd204cd4c6e678 (diff) | |
download | drakx-1c71fda8b71e1e2befad768906b8b5e2465a9ca6.tar drakx-1c71fda8b71e1e2befad768906b8b5e2465a9ca6.tar.gz drakx-1c71fda8b71e1e2befad768906b8b5e2465a9ca6.tar.bz2 drakx-1c71fda8b71e1e2befad768906b8b5e2465a9ca6.tar.xz drakx-1c71fda8b71e1e2befad768906b8b5e2465a9ca6.zip |
do not display nmblookup usage when there is no samba server
Diffstat (limited to 'perl-install/fs')
-rw-r--r-- | perl-install/fs/remote/smb.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/fs/remote/smb.pm b/perl-install/fs/remote/smb.pm index 84a58318a..acdf0d7cf 100644 --- a/perl-install/fs/remote/smb.pm +++ b/perl-install/fs/remote/smb.pm @@ -57,6 +57,7 @@ sub find_servers { s/\s.*\n// foreach @l; require network::network; my @servers = grep { network::network::is_ip($_) } @l; + return unless @servers; my %servers; $servers{$_}{ip} = $_ foreach @servers; my ($ip, $browse); |