summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-08-12 07:34:31 +0000
committerOlivier Blin <oblin@mandriva.org>2004-08-12 07:34:31 +0000
commit522163c80a5cbd18149adcc3cd4323ba16006d90 (patch)
tree2425df95e272987fc58d5ae68b01d4c1de55ca8f /perl-install/network
parentd9c47d1c0131ad5c2c386333753f87ccf6feeffd (diff)
downloaddrakx-522163c80a5cbd18149adcc3cd4323ba16006d90.tar
drakx-522163c80a5cbd18149adcc3cd4323ba16006d90.tar.gz
drakx-522163c80a5cbd18149adcc3cd4323ba16006d90.tar.bz2
drakx-522163c80a5cbd18149adcc3cd4323ba16006d90.tar.xz
drakx-522163c80a5cbd18149adcc3cd4323ba16006d90.zip
kill unused variables
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/netconnect.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 20fedf4a9..576fa4414 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -80,11 +80,11 @@ sub real_main {
my $mouse = $o_mouse ||= {};
my $intf = $o_intf ||= {};
my $first_time = $o_first_time || 0;
- my ($network_configured, $cnx_type, $type, $interface, @all_cards, %eth_intf);
+ my ($network_configured, $cnx_type, $type, @all_cards, %eth_intf);
my (%connections, @connection_list, $is_wireless);
my ($modem, $modem_name, $modem_conf_read, $modem_dyn_dns, $modem_dyn_ip);
my ($adsl_type, @adsl_devices, $adsl_failed, $adsl_answer, %adsl_data, $adsl_data, $adsl_provider, $adsl_old_provider);
- my ($ntf_name, $ipadr, $netadr, $gateway_ex, $up, $need_restart_network);
+ my ($ntf_name, $gateway_ex, $up, $need_restart_network);
my ($isdn, $isdn_name, $isdn_type, %isdn_cards, @isdn_dial_methods);
my $my_isdn = join('', N("Manual choice"), " (", N("Internal ISDN card"), ")");
my ($module, $auto_ip, $protocol, $onboot, $needhostname, $hotplug, $track_network_id, @fields); # lan config