summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-29 12:34:35 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-29 12:34:35 +0000
commitf6489bb8bd002ad8fc34b583f76fdc988a0f3af1 (patch)
tree208f782248423e6aae05698ab8bd6fed3c13c189 /perl-install/network
parenta27c82fc4dafe8eb5415ed0546f4db12d0167b02 (diff)
downloaddrakx-f6489bb8bd002ad8fc34b583f76fdc988a0f3af1.tar
drakx-f6489bb8bd002ad8fc34b583f76fdc988a0f3af1.tar.gz
drakx-f6489bb8bd002ad8fc34b583f76fdc988a0f3af1.tar.bz2
drakx-f6489bb8bd002ad8fc34b583f76fdc988a0f3af1.tar.xz
drakx-f6489bb8bd002ad8fc34b583f76fdc988a0f3af1.zip
move any::load_category() to network::interactive::load_category()
(and a few other functions which are only used by load_category())
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/ethernet.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index f9d97e00c..69135e363 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -2,7 +2,7 @@ package network::ethernet;
use network::network;
use modules;
-use any;
+use modules::interactive;
use detect_devices;
use common;
use run_program;
@@ -82,7 +82,7 @@ qq(
sub conf_network_card {
my ($netc, $intf, $type, $ipadr, $netadr) = @_;
#-type =static or dhcp
- any::load_category($in, 'network/main|usb', !$::expert, 1);
+ modules::interactive::load_category($in, 'network/main|usb', !$::expert, 1);
my @all_cards = conf_network_card_backend($netc, $intf, $type, undef, $ipadr, $netadr);
my $interface;
@all_cards == () and $in->ask_warn('', N("No ethernet network adapter has been detected on your system.
@@ -172,7 +172,7 @@ sub go_ethernet {
sub configureNetwork {
my ($netc, $intf, $_first_time) = @_;
local $_;
- any::load_category($in, 'network/main|usb|pcmcia', !$::expert, 1) or return;
+ modules::interactive::load_category($in, 'network/main|usb|pcmcia', !$::expert, 1) or return;
my @l = detect_devices::getNet() or die N("no network card found");
my @all_cards = conf_network_card_backend($netc, $intf, undef, undef, undef, undef);