X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-DeploymentHandler.git;a=blobdiff_plain;f=t%2Fbugs%2F01-emailed-bug-01.t;fp=t%2Fbugs%2F01-emailed-bug-01.t;h=8e65db4ce5f4a66514f77e1d2bbe7b5e74d0c284;hp=dca69b98e7f8d7a842895ba6737d2385b1e9c19e;hb=606558576b9c849f4b2a68c9d0709a3ef61e477a;hpb=cdb45dee99a52a37f6e61bfbec2e4af8f3a59f51 diff --git a/t/bugs/01-emailed-bug-01.t b/t/bugs/01-emailed-bug-01.t index dca69b9..8e65db4 100644 --- a/t/bugs/01-emailed-bug-01.t +++ b/t/bugs/01-emailed-bug-01.t @@ -19,8 +19,8 @@ my @connection = (sub { $dbh }, { ignore_version => 1 }); my $sql_dir = 't/sql'; use_ok 'DBICVersion_v1'; -my $s = DBICVersion::Schema->connect(@connection); -$DBICVersion::Schema::VERSION = 1; +my $s = DBICVersion::Schema1->connect(@connection); +$DBICVersion::Schema1::VERSION = 1; ok($s, 'DBICVersion::Schema 1 instantiates correctly'); my $dh = DH->new({