From: Peter Rabbitson <ribasushi@cpan.org>
Date: Wed, 2 Jun 2010 09:53:12 +0000 (+0000)
Subject: Do not run test without sqlt
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=43d2a76e8e0075cabe98f5a031d26aa97a045736;p=dbsrgits%2FDBIx-Class-Historic.git

Do not run test without sqlt
---

diff --git a/t/storage/deploy.t b/t/storage/deploy.t
index 4cc8dff..e6ccd2d 100644
--- a/t/storage/deploy.t
+++ b/t/storage/deploy.t
@@ -6,10 +6,16 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
+BEGIN {
+  require DBIx::Class;
+  plan skip_all =>
+      'Test needs ' . DBIx::Class::Optional::Dependencies->req_missing_for ('deploy')
+    unless DBIx::Class::Optional::Dependencies->req_ok_for ('deploy')
+}
+
 use File::Spec;
 use File::Path qw/ mkpath rmtree /;
 
-
 my $schema = DBICTest->init_schema();
 
 my $var = File::Spec->catfile(qw| t var create_ddl_dir |);