X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F94versioning.t;h=9dcdcf15f69175e0aced5349ff305cbbe8bc3402;hb=63af9ced21d59d5d92099a9b8853c2eece90569a;hp=a154d8f9682db27e2bb8892094f394f9b511c04b;hpb=c7e856308aeac1faa6f4d8ad59da096e009d70f4;p=dbsrgits%2FDBIx-Class.git diff --git a/t/94versioning.t b/t/94versioning.t index a154d8f..9dcdcf1 100644 --- a/t/94versioning.t +++ b/t/94versioning.t @@ -1,3 +1,5 @@ +use DBIx::Class::Optional::Dependencies -skip_all_without => qw(deploy test_rdbms_mysql); + use strict; use warnings; @@ -13,23 +15,7 @@ use lib qw(t/lib); use DBICTest; use DBIx::Class::_Util 'sigwarn_silencer'; -my ($dsn, $user, $pass); - -BEGIN { - ($dsn, $user, $pass) = @ENV{map { "DBICTEST_MYSQL_${_}" } qw/DSN USER PASS/}; - - plan skip_all => 'Set $ENV{DBICTEST_MYSQL_DSN}, _USER and _PASS to run this test' - unless ($dsn); - - 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'); - - plan skip_all => - 'Test needs ' . DBIx::Class::Optional::Dependencies->req_missing_for ('test_rdbms_mysql') - unless DBIx::Class::Optional::Dependencies->req_ok_for ('test_rdbms_mysql'); -} +my ($dsn, $user, $pass) = @ENV{map { "DBICTEST_MYSQL_${_}" } qw/DSN USER PASS/}; # this is just to grab a lock {