diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2005-01-06 09:20:04 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2005-01-06 09:20:04 +0000 |
commit | 0608f026bc19fd3877feedc62dc80b825f21791e (patch) | |
tree | 5c573d9e8fa44ca3b45180f83c478e30fd900d93 /perl-install/network/tools.pm | |
parent | b9fd823c3b3e4bc6f293c441f3b4f7e76138f832 (diff) | |
download | drakx-backup-do-not-use-0608f026bc19fd3877feedc62dc80b825f21791e.tar drakx-backup-do-not-use-0608f026bc19fd3877feedc62dc80b825f21791e.tar.gz drakx-backup-do-not-use-0608f026bc19fd3877feedc62dc80b825f21791e.tar.bz2 drakx-backup-do-not-use-0608f026bc19fd3877feedc62dc80b825f21791e.tar.xz drakx-backup-do-not-use-0608f026bc19fd3877feedc62dc80b825f21791e.zip |
remove unused variables
Diffstat (limited to 'perl-install/network/tools.pm')
-rw-r--r-- | perl-install/network/tools.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index e82afd16f..2e0ea2d74 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -272,8 +272,7 @@ sub get_interface_status { #- returns (gateway_interface, interface is up, gateway address, dns server address) sub get_internet_connection { my ($netc, $intf, $o_gw_intf) = @_; - my ($gw_intf, $is_up, $gw_address); - $gw_intf = $o_gw_intf || get_default_gateway_interface($netc, $intf) or return; + my $gw_intf = $o_gw_intf || get_default_gateway_interface($netc, $intf) or return; return $gw_intf, get_interface_status($gw_intf), $netc->{dnsServer}; } |