[Bast-commits] r4304 - in DBIx-Class/0.08/trunk: lib/DBIx/Class/Schema/Role t

jnapiorkowski at dev.catalyst.perl.org jnapiorkowski at dev.catalyst.perl.org
Mon Apr 28 19:36:59 BST 2008


Author: jnapiorkowski
Date: 2008-04-28 19:36:58 +0100 (Mon, 28 Apr 2008)
New Revision: 4304

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema/Role/AtQueryInterval.pm
   DBIx-Class/0.08/trunk/t/99schema_roles.t
Log:
minor formatting updates and typos fixes to the schema role tests

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema/Role/AtQueryInterval.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema/Role/AtQueryInterval.pm	2008-04-27 18:15:57 UTC (rev 4303)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema/Role/AtQueryInterval.pm	2008-04-28 18:36:58 UTC (rev 4304)
@@ -208,8 +208,8 @@
     }		
   }
 }
+ 
 
-
 =head2 normalize_query_interval ($hash||$obj)
 
 Given an argument, make sure it's a L<DBIx::Class::Schema::QueryInterval>,
@@ -226,6 +226,7 @@
   }
 }
 
+
 =head2 normalize_to_jobs ($hash||$obj||$arrayref)
 
 Incoming jobs need to be normalized to an array, so that we can handle adding

Modified: DBIx-Class/0.08/trunk/t/99schema_roles.t
===================================================================
--- DBIx-Class/0.08/trunk/t/99schema_roles.t	2008-04-27 18:15:57 UTC (rev 4303)
+++ DBIx-Class/0.08/trunk/t/99schema_roles.t	2008-04-28 18:36:58 UTC (rev 4304)
@@ -65,7 +65,7 @@
     => 'Found Dan!';
 
 is $schema->storage->query_count, 2
-    => 'Query Count is two';
+    => 'Query Count is two'; 
 
 
 =head2 check at query interval 
@@ -90,7 +90,7 @@
     => 'Got expected information from the job';
 
 ok my $interval1 = $schema->create_query_interval(every=>10)
-    => 'Created a interval';
+    => 'Created an interval';
 
 ok $interval1->matches(10)
     => 'correctly matched 10';
@@ -102,7 +102,7 @@
     => 'correctly didnt matched 22';
 
 ok my $interval2 = $schema->create_query_interval(every=>10, offset=>2)
-    => 'Created a interval';
+    => 'Created an interval';
 
 ok $interval2->matches(12)
     => 'correctly matched 12';
@@ -167,8 +167,11 @@
      
 is_deeply [$schema->execute_jobs_at_query_interval(101)], [101.1,101.2]
     => 'Got Expected return for 101';
-    
-    
+   
+   
+
+
+
 =head2 cleanup
 
 Cleanup after ourselves




More information about the Bast-commits mailing list