diff options
| author | Damien Chaumette <dchaumette@mandriva.com> | 2004-04-19 13:35:16 +0000 |
|---|---|---|
| committer | Damien Chaumette <dchaumette@mandriva.com> | 2004-04-19 13:35:16 +0000 |
| commit | 270a85828ffb2d728ee265a4c58fbd838842a0cb (patch) | |
| tree | 156098d2c96ab3cef8f9c627dda311cbf53a45a7 /perl-install | |
| parent | cfe5654dacb13e0eb4716336170229851349c151 (diff) | |
| download | drakx-270a85828ffb2d728ee265a4c58fbd838842a0cb.tar drakx-270a85828ffb2d728ee265a4c58fbd838842a0cb.tar.gz drakx-270a85828ffb2d728ee265a4c58fbd838842a0cb.tar.bz2 drakx-270a85828ffb2d728ee265a4c58fbd838842a0cb.tar.xz drakx-270a85828ffb2d728ee265a4c58fbd838842a0cb.zip | |
dropped $::i in foreach loop, use $i instead
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakconnect | 2 |
1 files changed, 1 insertions, 1 deletions
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) { |