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

migrate Wizard getForm to FormBuilder

Browse source
This commit is contained in:
Doug Bell 2011-02-16 17:11:11 -06:00
parent 2170509c0f
commit 37f392b4c8
4 changed files with 59 additions and 54 deletions
Download patch file Download diff file Expand all files Collapse all files

6
t/Wizard.t
View file

@ -50,12 +50,12 @@ is( $wizard->getCurrentStep, "one", "SetCurrentStep" );
# Form Start and End
my $f = $wizard->getForm;
isa_ok( $f, 'WebGUI::HTMLForm' );
my $html = $f->print;
isa_ok( $f, 'WebGUI::FormBuilder' );
my $html = $f->toHtml;
like( $html, qr/wizard_class.+WebGUI::Wizard/, 'getFormStart wizard_class' );
like( $html, qr/wizard_step.+one/, 'getFormStart wizard_step' );
$html = $wizard->getForm( "two" )->print;
$html = $wizard->getForm( "two" )->toHtml;
like( $html, qr/wizard_step.+two/, 'getFormStart wizard_step override step' );
#----------------------------------------------------------------------------