fix bogus use of old netwok module instead of network::network

3 files changed, 6 insertions, 6 deletions

diff --git a/perl-install/standalone/drakauth b/perl-install/standalone/drakauth
index 939b57c0c..6f2dfe236 100755
--- a/perl-install/standalone/drakauth
+++ b/perl-install/standalone/drakauth
@@ -7,11 +7,11 @@ use standalone;     #- warning, standalone must be loaded very first, for 'expla
 use common;
 use interactive;
 use any;
-use network;
+use network::network;
 
 my $netc = {};
 my $intf = {};
-network::read_all_conf('', $netc, $intf);
+read_all_conf('', $netc, $intf);
 
 my $in = 'interactive'->vnew('su');
 
diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw
index 43c2e752a..52960c204 100755
--- a/perl-install/standalone/drakgw
+++ b/perl-install/standalone/drakgw
@@ -28,7 +28,7 @@ use standalone;     #- warning, standalone must be loaded very first, for 'expla
 use common;
 use detect_devices;
 use interactive;
-use network;
+use network::network;
 use log;
 use c;
 use network::netconnect;
@@ -253,7 +253,7 @@ I am about to setup your Local Area Network with that adapter.", $format->($devi
     defined $device or quit_global($in, 0);
 }
 log::explanations("Choosing network device: $device");
-my $conf = network::read_interface_conf("/etc/sysconfig/network-scripts/ifcfg-$device");
+my $conf = read_interface_conf("/etc/sysconfig/network-scripts/ifcfg-$device");
 
 my $server_ip = $conf->{IPADDR} ||= network::network::read_dhcpd_conf()->{option_routers}[0] ||= "192.168.1.1";
 my $lan_address = $server_ip =~ m/(.*)\.(.*)/ && $1 ? "$1.0" : "192.168.1.0";
diff --git a/perl-install/standalone/drakpxe b/perl-install/standalone/drakpxe
index 4ceb492c7..9fd6a3b20 100755
--- a/perl-install/standalone/drakpxe
+++ b/perl-install/standalone/drakpxe
@@ -25,7 +25,7 @@ use standalone;     #- warning, standalone must be loaded very first, for 'expla
 
 use common;
 use interactive;
-use network;
+use network::network;
 use log;
 use c;
 
@@ -49,7 +49,7 @@ $::direct = grep { /-direct/ } @ARGV;
 #- get network configuration.
 my $netc = {};
 my $intf = {};
-network::read_all_conf('', $netc, $intf);
+network::network::read_all_conf('', $netc, $intf);
 
 my $in = 'interactive'->vnew('su');
 $::Wizard_title = N("PXE Server Configuration");