[Bast-commits] r4196 - DBIx-Class/0.08/trunk/t/cdbi-t

[schwern at dev.catalyst.perl.org]

Author: schwern
Date: 2008-03-14 01:32:02 +0000 (Fri, 14 Mar 2008)
New Revision: 4196

Modified:
   DBIx-Class/0.08/trunk/t/cdbi-t/24-meta_info.t
Log:
Fix the skip condition.

Modified: DBIx-Class/0.08/trunk/t/cdbi-t/24-meta_info.t
===================================================================
--- DBIx-Class/0.08/trunk/t/cdbi-t/24-meta_info.t	2008-03-13 20:45:37 UTC (rev 4195)
+++ DBIx-Class/0.08/trunk/t/cdbi-t/24-meta_info.t	2008-03-14 01:32:02 UTC (rev 4196)
@@ -1,12 +1,15 @@
 #!/usr/bin/perl -w
 
 use strict;
+use Test::More;
+
 BEGIN {
-  eval "require Time::Piece";
-  use Test::More skip_all => "Time::Piece required for this test";
+    plan skip_all => "Time::Piece required for this test"
+        unless eval { require Time::Piece };
+
+    plan tests => 12;
 }
 
-use Test::More tests => 12;
 use Test::Warn;
 
 package Temp::DBI;