oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix syntax warnings in Survey/Test.pm

Browse source
This commit is contained in:
Colin Kuskie 2009-05-21 15:09:15 +00:00
parent 8b86d56ec0
commit 946cf6e026
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Asset/Wobject/Survey/Test.pm
View file

@ -159,7 +159,8 @@ sub run {
# N.B. we pass setup to individual test rather than running it for test, because
# some test subs reset rJSON between sub-tests
if (my $args = $item->{test} ) {
my $args;
if ($args = $item->{test} ) {
push @tap, $self->_test( {
responseJSON => $rJSON,
surveyOrder => $surveyOrder,
@ -170,7 +171,7 @@ sub run {
setup => $setup,
} );
}
elsif (my $args = $item->{test_mc} ) {
elsif ($args = $item->{test_mc} ) {
push @tap, $self->_test_mc( {
responseJSON => $rJSON,
surveyOrder => $surveyOrder,
@ -181,7 +182,7 @@ sub run {
setup => $setup,
} );
}
elsif (my $args = $item->{sequence} ) {
elsif ($args = $item->{sequence} ) {
push @tap, $self->_sequence( {
responseJSON => $rJSON,
surveyOrder => $surveyOrder,
@ -191,7 +192,7 @@ sub run {
name => $name,
} );
}
elsif (my $args = $item->{defined} ) {
elsif ($args = $item->{defined} ) {
push @tap, $self->_defined( {
responseJSON => $rJSON,
surveyOrder => $surveyOrder,