From 35a6abdf24aa707237aadda507c6c2ed27c91490 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 24 Oct 2007 14:37:17 +0000
Subject: - bootloader-config must not need network::network from libdrakx-net

---
 perl-install/NEWS             | 1 +
 perl-install/fs/remote/smb.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index c1072a976..1b226f5ff 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,4 @@
+- bootloader-config must not need network::network from libdrakx-net
 - localedrake:
   o do propose "Suisse" after selecting french language (#34675)
 - draksec:
diff --git a/perl-install/fs/remote/smb.pm b/perl-install/fs/remote/smb.pm
index 933941326..7757eeb3f 100644
--- a/perl-install/fs/remote/smb.pm
+++ b/perl-install/fs/remote/smb.pm
@@ -5,7 +5,6 @@ use diagnostics;
 
 use common;
 use fs::mount_options;
-use network::network;
 use fs::remote;
 
 
@@ -56,6 +55,7 @@ sub smbclient {
 sub find_servers {
     my (undef, @l) = `nmblookup "*"`;
     s/\s.*\n// foreach @l;
+    require network::network;
     my @servers = grep { network::network::is_ip($_) } @l;
     my %servers;
     $servers{$_}{ip} = $_ foreach @servers;
-- 
cgit v1.2.1