From c20c262055834813afcfb065effc0381a20058b0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 18 Dec 2002 08:09:49 +0000
Subject: perl_checker fixes

---
 perl-install/standalone/drakconnect | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/standalone/drakconnect')

diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index 739b2dc67..a27b6fb2e 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -375,7 +375,7 @@ sub update {
     $label6->set($netcnx->{type} eq 'lan' ? $netc->{GATEWAY} : $netcnx->{NET_INTERFACE});
 #TV    $list->window->freeze();
 #TV    $list->window->clear();
-#TV    build_list();
+    build_list();
 #TV    $list->window->thaw();
     $button_del->set_sensitive(network::netconnect::get_profiles() > 1);
     $isconnected != -1 or return 1;
@@ -664,7 +664,7 @@ Create one first by clicking on 'Configure'")),1,1,0);
     $button_ok->signal_connect(clicked => sub {
 				     $i = 0;
 				     foreach (@mask) {
-					    ${$conf_data[$i]->[1]} = $infos[2*$i+1]->get_text() if $_;
+					    ${$conf_data[$i][1]} = $infos[2*$i+1]->get_text() if $_;
 					    $i++;
 				     }
 				     update();
-- 
cgit v1.2.1