summaryrefslogtreecommitdiffstats
path: root/perl-install/network.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-22 12:19:45 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-22 12:19:45 +0000
commit53b5abee1210a87a0004573a9dd7d7e3dfbe05ea (patch)
tree6ceda3e349011de93250708f96bd3df7b7527242 /perl-install/network.pm
parent88d070945ccf746f7df37369a0a5f4167ca95c8b (diff)
downloaddrakx-53b5abee1210a87a0004573a9dd7d7e3dfbe05ea.tar
drakx-53b5abee1210a87a0004573a9dd7d7e3dfbe05ea.tar.gz
drakx-53b5abee1210a87a0004573a9dd7d7e3dfbe05ea.tar.bz2
drakx-53b5abee1210a87a0004573a9dd7d7e3dfbe05ea.tar.xz
drakx-53b5abee1210a87a0004573a9dd7d7e3dfbe05ea.zip
$::beginner is deprecated, replaced by !$::expert
Diffstat (limited to 'perl-install/network.pm')
-rw-r--r--perl-install/network.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm
index 6ed925406..de30096e2 100644
--- a/perl-install/network.pm
+++ b/perl-install/network.pm
@@ -254,7 +254,7 @@ sub configureNetwork {
any::setup_thiskind($in, 'net', !$::expert, 1);
my @l = detect_devices::getNet() or die _("no network card found");
- my $last; foreach ($::beginner ? $l[0] : @l) {
+ my $last; foreach ($::expert ? @l : $l[0]) {
my $intf2 = findIntf($intf ||= {}, $_);
add2hash($intf2, $last);
add2hash($intf2, { NETMASK => '255.255.255.0' });
@@ -359,7 +359,7 @@ sub miscellaneousNetwork {
my ($in, $clicked) = @_;
my $u = $::o->{miscellaneous} ||= {};
$::isInstall and $in->set_help('configureNetworkProxy');
- !$::beginner || $clicked and $in->ask_from_entries_refH('',
+ $::expert || $clicked and $in->ask_from_entries_refH('',
_("Proxies configuration"),
[ { label => _("HTTP proxy"), val => \$u->{http_proxy} },
{ label => _("FTP proxy"), val => \$u->{ftp_proxy} },