Author: spadkins
Date: Mon Oct 6 13:53:53 2008
New Revision: 11940
Modified:
p5ee/trunk/App-Repository/t/DBI-getset-cache.t
p5ee/trunk/App-Repository/t/DBI-getset-realtable.t
Log:
latest
Modified: p5ee/trunk/App-Repository/t/DBI-getset-cache.t
==============================================================================
--- p5ee/trunk/App-Repository/t/DBI-getset-cache.t (original)
+++ p5ee/trunk/App-Repository/t/DBI-getset-cache.t Mon Oct 6 13:53:53 2008
@@ -148,6 +148,7 @@
is($rep->set("test_person", 1, "first_name", "steve"),1,"set() first name
[steve]");
$first_name = $rep->get("test_person", 1, "first_name");
is($first_name, "stephen", "get() modified first_name [$first_name] got cache
instead");
+#exit(0);
$first_name = $rep->get("test_person", {person_id => 1}, "first_name");
is($first_name, "steve", "get() modified first_name [$first_name]");
$age = $rep->get("test_person", 1, "age");
@@ -188,7 +189,7 @@
is($person_id, 4, "get_row() 3 values w/ %crit (checking 3 of 3)
person_id=$person_id");
$data_rows = $rep->get_rows("test_person", {}, [ "person_id", "age",
"first_name", "gender", "state" ], {order_by=>["person_id"]});
-is_deeply($data_rows, $rows, "get_rows() got original cached data thanks to
cache_minimum_rows");
+is_deeply($data_rows, $rows, "get_rows() got original cached data thanks to
cache_minimum_columns");
$data_rows2 = $rep->{dbh}->selectall_arrayref("select person_id, age,
first_name, gender, state from test_person order by person_id");
$data_rows = $rep->get_rows("test_person", {}, [ "person_id", "age",
"first_name", "gender", "state" ], {order_by=>["person_id"], cache_skip => 1});
Modified: p5ee/trunk/App-Repository/t/DBI-getset-realtable.t
==============================================================================
--- p5ee/trunk/App-Repository/t/DBI-getset-realtable.t (original)
+++ p5ee/trunk/App-Repository/t/DBI-getset-realtable.t Mon Oct 6 13:53:53 2008
@@ -132,12 +132,11 @@
# $value = $rep->get ($table, $key, $col, \%options);
# $rep->set($table, $key, $col, $value, \%options);
#####################################################################
-$data_rows = $rep->get_rows("test_person", {}, ["state"],
{order_by=>["person_id"]});
$first_name = $rep->get("test_person", 1, "first_name");
is($first_name, "stephen", "get() first_name [$first_name]");
is($rep->set("test_person", 1, "first_name", "steve"),1,"set() first name
[steve]");
$first_name = $rep->get("test_person", 1, "first_name");
-is($first_name, "stephen", "get() modified first_name [$first_name] got cache
instead");
+is($first_name, "steve", "get() modified first_name [$first_name] (no cache)");
exit(0);
