[Bast-commits] r6774 - in trunk/DBIx-Class-TimeStamp: . lib/DBIx/Class t

jnapiorkowski at dev.catalyst.perl.org jnapiorkowski at dev.catalyst.perl.org
Tue Jun 23 18:44:11 GMT 2009


Author: jnapiorkowski
Date: 2009-06-23 18:44:10 +0000 (Tue, 23 Jun 2009)
New Revision: 6774

Modified:
   trunk/DBIx-Class-TimeStamp/Changes
   trunk/DBIx-Class-TimeStamp/lib/DBIx/Class/TimeStamp.pm
   trunk/DBIx-Class-TimeStamp/t/05datetime.t
Log:
more changes to make sure the tests do not pointlessly fail

Modified: trunk/DBIx-Class-TimeStamp/Changes
===================================================================
--- trunk/DBIx-Class-TimeStamp/Changes	2009-06-23 17:57:03 UTC (rev 6773)
+++ trunk/DBIx-Class-TimeStamp/Changes	2009-06-23 18:44:10 UTC (rev 6774)
@@ -1,5 +1,9 @@
 Revision history for DBIx::Class::TimeStamp
 
+0.11 2009 07-32 14:43:00
+    - Make sure tests run at the 'top' of the second to reduce pointless
+      errors resulting when your test time crosses the second limit.
+
 0.10 2009 07-32 13:55:00
     - Restored the MySQL formatter to the build requires to silence test
       failures.

Modified: trunk/DBIx-Class-TimeStamp/lib/DBIx/Class/TimeStamp.pm
===================================================================
--- trunk/DBIx-Class-TimeStamp/lib/DBIx/Class/TimeStamp.pm	2009-06-23 17:57:03 UTC (rev 6773)
+++ trunk/DBIx-Class-TimeStamp/lib/DBIx/Class/TimeStamp.pm	2009-06-23 18:44:10 UTC (rev 6774)
@@ -7,7 +7,7 @@
 
 use DateTime;
 
-our $VERSION = '0.10';
+our $VERSION = '0.11';
 
 __PACKAGE__->load_components( qw/DynamicDefault InflateColumn::DateTime/ );
 

Modified: trunk/DBIx-Class-TimeStamp/t/05datetime.t
===================================================================
--- trunk/DBIx-Class-TimeStamp/t/05datetime.t	2009-06-23 17:57:03 UTC (rev 6773)
+++ trunk/DBIx-Class-TimeStamp/t/05datetime.t	2009-06-23 18:44:10 UTC (rev 6774)
@@ -18,6 +18,9 @@
 my $schema = DBIC::Test->init_schema;
 my $row;
 
+my $t = time(); 
+Time::HiRes::sleep (int ($t) + 1 - $t);
+
 $row = $schema->resultset('DBIC::Test::Schema::TestDatetime')
     ->create({ display_name => 'test record' });
 




More information about the Bast-commits mailing list