From c5ac1412e3e7edbbd3a5dfc0cdeff71b11660e2a Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 7 Jan 2009 19:05:33 +0000
Subject: lookup for Samba master browsers too

---
 perl-install/fs/remote/smb.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/fs')

diff --git a/perl-install/fs/remote/smb.pm b/perl-install/fs/remote/smb.pm
index 7757eeb3f..1399d2f62 100644
--- a/perl-install/fs/remote/smb.pm
+++ b/perl-install/fs/remote/smb.pm
@@ -53,7 +53,7 @@ sub smbclient {
 }
 
 sub find_servers {
-    my (undef, @l) = `nmblookup "*"`;
+    my (undef, @l) = `nmblookup "*"; nmblookup -M -- -`;
     s/\s.*\n// foreach @l;
     require network::network;
     my @servers = grep { network::network::is_ip($_) } @l;
-- 
cgit v1.2.1