Remove disabled check from all tests because it gives inconsistent

results.  Some forms were returning undef, some were returning 0.

Added a Radio button test.
Added a test to Checkbox that sees if the value (which is displayed to the
user) can be only whitespace.
This commit is contained in:
Colin Kuskie 2006-04-02 19:25:01 +00:00
parent 29635395cf
commit dc2ec6bbdd
13 changed files with 145 additions and 27 deletions

View file

@ -48,7 +48,7 @@ my $testBlock = [
my $formClass = 'WebGUI::Form::SelectBox';
my $formType = 'SelectBox';
my $numTests = 9 + scalar @{ $testBlock } + 1;
my $numTests = 8 + scalar @{ $testBlock } + 1;
diag("Planning on running $numTests tests\n");
@ -83,7 +83,6 @@ is(scalar @inputs, 1, 'The form has 1 input');
my $input = $form->find_input('ListBox');
is($input->name, 'ListBox', 'Checking input name');
is($input->type, 'option', 'Checking input type');
is($input->disabled, undef, 'Disabled param not sent to form');
is($input->value, 'c', 'Checking default value');
is($input->{size}, 1, 'default size');