[Bast-commits] r6432 - DBIx-Class/0.08/trunk/t

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-05-26 14:36:55 +0000 (Tue, 26 May 2009)
New Revision: 6432

Modified:
   DBIx-Class/0.08/trunk/t/89inflate_datetime.t
Log:
Fix test skip message

Modified: DBIx-Class/0.08/trunk/t/89inflate_datetime.t
===================================================================
--- DBIx-Class/0.08/trunk/t/89inflate_datetime.t	2009-05-26 14:30:52 UTC (rev 6431)
+++ DBIx-Class/0.08/trunk/t/89inflate_datetime.t	2009-05-26 14:36:55 UTC (rev 6432)
@@ -149,8 +149,9 @@
 } # Skip if no MySQL DT::Formatter
 
 SKIP: {
+  eval { require DateTime::Format::Pg };
+  skip ('Need DateTime::Format::Pg for timestamp inflation tests', 3) if $@;
 
-  skip "ENV{DBIC_FLOATING_TZ_OK} was set, skipping", 3 unless eval { require DateTime::Format::Pg; 1};
   my $event = $schema->resultset("EventTZPg")->find(1);
   $event->update({created_on => '2009-01-15 17:00:00+00'});
   $event->discard_changes;