diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-11-27 15:03:03 +0000 | ||||
|---|---|---|---|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-11-27 15:03:03 +0000 | ||||
| commit | f89c9d73f806d24c4b52328fad42a7e278f06999 (patch) | |||||
| tree | 5f5d9c7d662c55405da60edad9393d146770e5ac /perl-install/network | |||||
| parent | 527f23af5240b28f75cad884bf6e9f3223daff80 (diff) | |||||
| download | drakx-f89c9d73f806d24c4b52328fad42a7e278f06999.tar drakx-f89c9d73f806d24c4b52328fad42a7e278f06999.tar.gz drakx-f89c9d73f806d24c4b52328fad42a7e278f06999.tar.bz2 drakx-f89c9d73f806d24c4b52328fad42a7e278f06999.tar.xz drakx-f89c9d73f806d24c4b52328fad42a7e278f06999.zip | |||||
| -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}; } |