Author: spadkins
Date: Mon Apr 9 11:16:30 2007
New Revision: 9382
Modified:
p5ee/trunk/App-Repository/t/DBI-repobjectdom.t
p5ee/trunk/App-Repository/t/DBI-repobjectset.t
Log:
updated for new object_set indexing
Modified: p5ee/trunk/App-Repository/t/DBI-repobjectdom.t
==============================================================================
--- p5ee/trunk/App-Repository/t/DBI-repobjectdom.t (original)
+++ p5ee/trunk/App-Repository/t/DBI-repobjectdom.t Mon Apr 9 11:16:30 2007
@@ -139,9 +139,9 @@
$objset->set_params({});
$objects = $objset->get_objects("F",["gender"]);
ok($#$objects == 2, "got 3 female objects");
- $objects = $objset->get_objects("M");
+ $objects = $objset->get_objects("M","gender");
ok($#$objects == 3, "got 4 male objects");
- $index = $objset->get_index();
+ $index = $objset->get_index("gender");
ok(ref($index) eq "HASH", "got a hashref for an index");
ok(defined $index->{M}, "M part of index found");
ok(defined $index->{F}, "F part of index found");
@@ -156,7 +156,7 @@
$objects = $objset->get_objects();
ok($#$objects == 3, "got 4 objects");
$objset->get_unique_index(["first_name"]);
- my $object = $objset->get_object("stephen");
+ my $object = $objset->get_object("stephen",["first_name"]);
ok($object->{age} == 39, "got stephen object (age 39)");
}
Modified: p5ee/trunk/App-Repository/t/DBI-repobjectset.t
==============================================================================
--- p5ee/trunk/App-Repository/t/DBI-repobjectset.t (original)
+++ p5ee/trunk/App-Repository/t/DBI-repobjectset.t Mon Apr 9 11:16:30 2007
@@ -133,9 +133,9 @@
$objset->set_params({});
$objects = $objset->get_objects("F",["gender"]);
ok($#$objects == 2, "got 3 female objects");
- $objects = $objset->get_objects("M");
+ $objects = $objset->get_objects("M","gender");
ok($#$objects == 3, "got 4 male objects");
- $index = $objset->get_index();
+ $index = $objset->get_index("gender");
ok(ref($index) eq "HASH", "got a hashref for an index");
ok(defined $index->{M}, "M part of index found");
ok(defined $index->{F}, "F part of index found");
@@ -150,7 +150,7 @@
$objects = $objset->get_objects();
ok($#$objects == 3, "got 4 objects");
$objset->get_unique_index(["first_name"]);
- my $object = $objset->get_object("stephen");
+ my $object = $objset->get_object("stephen","first_name");
ok($object->{age} == 39, "got stephen object (age 39)");
# max_age
