From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sun, 31 Jan 2010 09:04:43 +0000 (+0000)
Subject: better skip message
X-Git-Tag: v0.08116~17
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d755000b7aca1430c279859de8be5ebaf0e3b767;p=dbsrgits%2FDBIx-Class.git

better skip message
---

diff --git a/t/cdbi/22-deflate_order.t b/t/cdbi/22-deflate_order.t
index 5267ae0..3d53245 100644
--- a/t/cdbi/22-deflate_order.t
+++ b/t/cdbi/22-deflate_order.t
@@ -9,14 +9,16 @@ if ($@) {
     next;
 }
 
+plan skip_all => 'Set $ENV{DBICTEST_MYSQL_DSN}, _USER and _PASS to run this test'
+  unless ($ENV{DBICTEST_MYSQL_DSN} && $ENV{DBICTEST_MYSQL_USER});
+
 eval { require Time::Piece::MySQL };
 plan skip_all => "Need Time::Piece::MySQL for this test" if $@;
 
-use lib 't/cdbi/testlib';
-eval { require 't/cdbi/testlib/Log.pm' };
-plan skip_all => "Need MySQL for this test" if $@;
+plan tests => 3;
 
-plan tests => 2;
+use lib 't/cdbi/testlib';
+use_ok ('Log');
 
 package main;