. * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. * */ $unitFilename = $_SERVER['PWD'] . '/test/bootstrap/unit.php' ; require_once( $unitFilename ); require_once( PATH_THIRDPARTY . '/lime/lime.php'); require_once( PATH_THIRDPARTY.'lime/yaml.class.php'); G::LoadThirdParty('smarty/libs','Smarty.class'); G::LoadSystem ( 'xmlform'); G::LoadSystem ( 'xmlDocument'); G::LoadSystem ( 'form'); require_once( 'propel/Propel.php' ); require_once ( "creole/Creole.php" ); require_once ( PATH_CORE . "config/databases.php"); $counter=1; $obj = new Form ( 'login/login'); $method = array ( ); $testItems = 0; $methods = get_class_methods('Form'); $t = new lime_test(15, new lime_output_color()); $t->diag('class Form' ); $t->is( count($methods) , 12, "class Form " . count($methods) . " methods." ); $t->can_ok( $obj, 'Form',$counter++.' Form()'); $t->can_ok( $obj, 'setDefaultValues',$counter++.' setDefaultValues()'); $t->can_ok( $obj, 'printTemplate', $counter++.' printTemplate()'); $t->can_ok( $obj, 'render', $counter++.' render()'); $t->can_ok( $obj, 'setValues', $counter++.' setValues()'); $t->can_ok( $obj, 'getFields', $counter++.' getFields()'); $t->can_ok( $obj, 'validatePost', $counter++.' validatePost()'); $t->can_ok( $obj, 'validateArray', $counter++.' validateArray()'); $t->can_ok( $obj, 'getVars', $counter++.' getVars()'); $t->can_ok( $obj, 'validateRequiredFields', $counter++.' validateRequiredFields()'); $t->can_ok( $obj, 'parseFile', $counter++.' parseFile()'); $t->can_ok( $obj, 'cloneObject', $counter++.' cloneObject()'); $t->is( count($methods) , --$counter , "ok"); $t->todo( 'review all pendings in this class');