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

modify validation regexp for Float.

Browse source 
Add Float test
Add new Integer test
This commit is contained in:
Colin Kuskie 2006-03-27 00:29:03 +00:00
parent 123886d4a9
commit 1ac514982f
3 changed files with 102 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
t/Form/Integer.t
View file

@ -27,7 +27,7 @@ my $session = WebGUI::Test->session;
# put your tests here
my $numTests = 9;
my $numTests = 10;
diag("Planning on running $numTests tests\n");
@ -70,6 +70,7 @@ $request->mock('body',
return '-123456' if ($value eq 'TestInteger');
return "+123456" if ($value eq 'TestInteger2');
return "123-456" if ($value eq 'TestInteger3');
return "123.456" if ($value eq 'TestInteger4');
return;
}
);
@ -81,5 +82,7 @@ $value = $session->form->get('TestInteger2', 'integer');
is($value, 0, 'checking form rejects explicitly postive integer');
$value = $session->form->get('TestInteger3', 'integer');
is($value, 0, 'checking form rejects non-sense integer');
$value = $session->form->get('TestInteger4', 'integer');
is($value, 0, 'checking form rejects non-sense integer');
##Integer Forms have no special value preprocessing,