1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index fdbf20bff..930a76e72 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -688,8 +688,9 @@ sub update_list() {
 
 sub apply {
     my ($netc, $intf) = @_;
-    network::network::sethostname($netc) if is_dynamic_ip({ $intf });   
-    network::network::configureNetwork2($in, '', $netc, {$intf->{DEVICE} => $intf });
+    my %intfs = ($intf->{DEVICE} => $intf);
+    network::network::sethostname($netc) if is_dynamic_ip(\%intfs);   
+    network::network::configureNetwork2($in, '', $netc, \%intfs);
 }
 
 sub ethisup { `LC_ALL=C LANGUAGE=C /sbin/ifconfig $_[0]` =~ /inet/ }