migrate EMSToken to FormBuilder

This commit is contained in:
Doug Bell 2011-01-25 12:02:59 -06:00
parent 6729cb0621
commit 1d9911ff0c
2 changed files with 60 additions and 6 deletions

View file

@ -186,12 +186,12 @@ sub view {
# build the add to cart form
if ($form->get('badgeId') ne '') {
my $addToCart = WebGUI::HTMLForm->new($self->session, action=>$self->getUrl);
$addToCart->hidden(name=>"func", value=>"addToCart");
$addToCart->hidden(name=>"badgeId", value=>$form->get('badgeId'));
$addToCart->integer(name=>'quantity', value=>1, label=>$i18n->get('quantity','Shop'));
$addToCart->submit(value=>$i18n->get('add to cart','Shop'), label=>$self->getPrice);
$output .= $addToCart->print;
my $f = WebGUI::FormBuilder->new($self->session, action=>$self->getUrl);
$f->addField( "hidden", name=>"func", value=>"addToCart");
$f->addField( "hidden", name=>"badgeId", value=>$form->get('badgeId'));
$f->addField( "integer", name=>'quantity', value=>1, label=>$i18n->get('quantity','Shop'));
$f->addField( "submit", value=>$i18n->get('add to cart','Shop'), label=>$self->getPrice);
$output .= $f->toHtml;
}
return $output;