summaryrefslogtreecommitdiffstats
path: root/perl-install/network/tools.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/tools.pm')
-rw-r--r--perl-install/network/tools.pm3
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};
}