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

fix typos in testBlock keys

Browse source
This commit is contained in:
Colin Kuskie 2006-03-31 18:36:54 +00:00
parent 84342ea69c
commit 833e5238eb
3 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Form/Integer.t
View file

@ -34,10 +34,10 @@ tie %testBlock, 'Tie::IxHash';
%testBlock = (
INT1 => [ '-123456', 'EQUAL', 'valid, negative integer'],
INT1 => [ '002300', 'EQUAL', 'valid, leading zeroes'],
INT2 => [ '+123456', 0, 'reject explicitly positive integer'],
INT3 => [ '123-456.', 0, 'rejects non-sense integer with negative sign'],
INT4 => [ '123.456', 0, 'rejects float'],
INT2 => [ '002300', 'EQUAL', 'valid, leading zeroes'],
INT3 => [ '+123456', 0, 'reject explicitly positive integer'],
INT4 => [ '123-456.', 0, 'rejects non-sense integer with negative sign'],
INT5 => [ '123.456', 0, 'rejects float'],
);
my $formClass = 'WebGUI::Form::Integer';