fix test cleanup for AdSpace, add leading 0 test to Form::Text

This commit is contained in:
Colin Kuskie 2006-09-12 04:35:35 +00:00
parent 15345a0232
commit d3fbe15ca7
2 changed files with 7 additions and 1 deletions

View file

@ -46,6 +46,12 @@ my $testBlock = [
expected => 'EQUAL',
comment => 'single word',
},
{
key => 'Text4',
testValue => '0leadingzero',
expected => 'EQUAL',
comment => 'leading zero',
},
];
my $formType = 'text';