X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fadmin%2F03data.t;h=faad5becd6b40141c6bbd9444920a41592d0a654;hb=268310425c798353b02b928d43f0bd1ed9601032;hp=8bdd5626da1abf51190994ea3790897c3e3df887;hpb=ebcd0e4f2fca6179af13aad39a1b0d36d73fbaff;p=dbsrgits%2FDBIx-Class.git diff --git a/t/admin/03data.t b/t/admin/03data.t index 8bdd562..faad5be 100644 --- a/t/admin/03data.t +++ b/t/admin/03data.t @@ -4,7 +4,6 @@ use warnings; use Test::More; use Test::Exception; -use Test::Deep; BEGIN { require DBIx::Class; @@ -54,7 +53,7 @@ use ok 'DBIx::Class::Admin'; ]; my $data; lives_ok { $data = $admin->select('Employee')} 'can retrive data from database'; - cmp_deeply($data, $expected_data, 'DB matches whats expected'); + is_deeply($data, $expected_data, 'DB matches whats expected'); $admin->delete('Employee', {name=>'Trout'}); my $del_rs = $employees->search({name => 'Trout'});