[svn:p5ee] r11940 - p5ee/trunk/App-Repository/t

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);