X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01basic_collection.t;h=9fded992a9f144bd3c2cd3aeb420cb482200f2d0;hb=b1c3fd5d20728018e1b8c4bcdd7ad0a17e047fb9;hp=c987036629fda4c4961a0a515a5be13425eab85d;hpb=e49bd8614d0ac18dc8bc7cae5c3a687d3d032077;p=dbsrgits%2FDBIx-Data-Store-old.git diff --git a/t/01basic_collection.t b/t/01basic_collection.t index c987036..9fded99 100644 --- a/t/01basic_collection.t +++ b/t/01basic_collection.t @@ -133,4 +133,8 @@ is($pterry->{name}, 'Sir Pterry', 'Pterry retrieved by id'); ok(!defined($set->get({ id => -1 })), 'undef on missing id'); +$pterry->{name} = 'Pterry'; + +is_deeply([ sort_set $set->flatten ], \@expect, 'Basic data after fetch by id'); + done_testing;