Updated to reflect changes in Crud api
This commit is contained in:
parent
08aa7b4208
commit
990925415b
1 changed files with 4 additions and 4 deletions
8
t/Crud.t
8
t/Crud.t
|
|
@ -112,10 +112,10 @@ while (my $object = $iterator->()) {
|
|||
}
|
||||
|
||||
#crud management stuff
|
||||
is(ref WebGUI::Crud->crud_getProperties, 'HASH', 'properties work');
|
||||
is(WebGUI::Crud->crud_getTableKey, 'id', 'default key is id');
|
||||
is(WebGUI::Crud->crud_getTableName, 'unnamed_crud_table', 'default table is unnamed_crud_table');
|
||||
is(WebGUI::Crud->crud_getSequenceKey, '', 'default sequence key is blank');
|
||||
is(ref WebGUI::Crud->crud_getProperties($session), 'HASH', 'properties work');
|
||||
is(WebGUI::Crud->crud_getTableKey($session), 'id', 'default key is id');
|
||||
is(WebGUI::Crud->crud_getTableName($session), 'unnamed_crud_table', 'default table is unnamed_crud_table');
|
||||
is(WebGUI::Crud->crud_getSequenceKey($session), '', 'default sequence key is blank');
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue