X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frow%2Finflate_result.t;h=3327b706f135ca9c8a25d80d75680221b18708c6;hb=76cc4546dfc51e7d83add9a90af1eb2d5a7d156c;hp=ecdd68c5e11b4ed3c95c2b4d8012b98e497e61a7;hpb=4bea1fe7a2b4827947b3d0d64b16a0f2c5e594bd;p=dbsrgits%2FDBIx-Class.git diff --git a/t/row/inflate_result.t b/t/row/inflate_result.t index ecdd68c..3327b70 100644 --- a/t/row/inflate_result.t +++ b/t/row/inflate_result.t @@ -78,7 +78,7 @@ my $admin_data = { admin => 1 }; -ok( my $schema = My::Schema->connection(DBICTest->_database) ); +ok( my $schema = My::Schema->connect(DBICTest->_database) ); ok( $schema->storage->dbh->do( @@ -86,13 +86,14 @@ ok( ) ); -TODO: { - local $TODO = 'New objects should also be inflated'; - my $user = $schema->resultset('User')->create($user_data); - my $admin = $schema->resultset('User')->create($admin_data); +{ + my $user = $schema->resultset('User')->create($user_data); + my $admin = $schema->resultset('User')->create($admin_data); - is( ref $user, 'My::Schema::Result::User' ); - is( ref $admin, 'My::Schema::Result::User::Admin' ); + is( ref $user, 'My::Schema::Result::User' ); + + local $TODO = 'New objects should also be inflated'; + is( ref $admin, 'My::Schema::Result::User::Admin' ); } my $user = $schema->resultset('User')->single($user_data);