From: Arthur Axel 'fREW' Schmidt Date: Mon, 22 Feb 2010 05:41:30 +0000 (-0600) Subject: more load tests and fixes for tests X-Git-Tag: v0.001000_01~162 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-DeploymentHandler.git;a=commitdiff_plain;h=099d6ab07e1de14f3cb6dcc66b925330aa6ff3fe more load tests and fixes for tests --- diff --git a/lib/DBIx/Class/DeploymentHandler/Component.pm b/lib/DBIx/Class/DeploymentHandler/Component.pm index 33bf3a8..0c2ef93 100644 --- a/lib/DBIx/Class/DeploymentHandler/Component.pm +++ b/lib/DBIx/Class/DeploymentHandler/Component.pm @@ -3,11 +3,13 @@ package DBIx::Class::DepolymentHandler::Component; use strict; use warnings; +use Carp 'carp'; + sub connection { my $self = shift; $self->next::method(@_); - $args = $_[3] || {}; + my $args = $_[3] || {}; return if $args->{ignore_version} || $ENV{DBIC_NO_VERSION_CHECK}; diff --git a/t/01-load.t b/t/01-load.t index 8c28e61..cccff7d 100644 --- a/t/01-load.t +++ b/t/01-load.t @@ -4,5 +4,8 @@ use Test::More; use lib 't/lib'; use_ok 'DBIx::Class::DeploymentHandler'; +use_ok 'DBIx::Class::DeploymentHandler::VersionResult'; +use_ok 'DBIx::Class::DeploymentHandler::VersionResultSet'; +use_ok 'DBIx::Class::DeploymentHandler::Component'; done_testing;