From 270a85828ffb2d728ee265a4c58fbd838842a0cb Mon Sep 17 00:00:00 2001 From: Damien Chaumette Date: Mon, 19 Apr 2004 13:35:16 +0000 Subject: dropped $::i in foreach loop, use $i instead --- perl-install/standalone/drakconnect | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index d9afe0bf6..f29e9b16b 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -974,7 +974,7 @@ Please run \"Internet access\" in control center.")); gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => $exit_dialogsub), gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { foreach my $i (0..$#conf_data) { - ${$conf_data[$::i][1]} = $infos[2*$::i+1]->get_text; + ${$conf_data[$i][1]} = $infos[2*$i+1]->get_text; }; # called from old GUI? if ($label_host) { -- cgit v1.2.1