From c39ce7aa14f2424c874cc58b5ce5249a05fabe66 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 22 Jan 2004 20:24:49 +0000 Subject: perl_checker fixes --- drakwizard.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'drakwizard.pl') diff --git a/drakwizard.pl b/drakwizard.pl index aaaab1f9..153c28a8 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -110,7 +110,7 @@ sub wizard { } if (ref $d->{boolean_list} && ref ${$d->{boolean_list}}) { my $i; - foreach (@{${$d->{boolean_list}}}){ + foreach (@{${$d->{boolean_list}}}) { push @$data2, { text => $_, type => 'bool', val => \${$d->{val}}->[$i], disabled => $d->{disabled} }; $i++ } -- cgit v1.2.1