From: Peter Rabbitson Date: Tue, 11 Aug 2009 17:40:59 +0000 (+0000) Subject: Whitespace X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c9372242657c1b20e0558ff00891a4717ecab6de;p=dbsrgits%2FDBIx-Class-Historic.git Whitespace --- diff --git a/t/inflate/serialize.t b/t/inflate/serialize.t index c2be971..1564798 100644 --- a/t/inflate/serialize.t +++ b/t/inflate/serialize.t @@ -10,13 +10,13 @@ my $schema = DBICTest->init_schema(); use Data::Dumper; my @serializers = ( - { module => 'YAML.pm', - inflater => sub { YAML::Load (shift) }, - deflater => sub { die "Expecting a reference" unless (ref $_[0]); YAML::Dump (shift) }, + { module => 'YAML.pm', + inflater => sub { YAML::Load (shift) }, + deflater => sub { die "Expecting a reference" unless (ref $_[0]); YAML::Dump (shift) }, }, - { module => 'Storable.pm', - inflater => sub { Storable::thaw (shift) }, - deflater => sub { die "Expecting a reference" unless (ref $_[0]); Storable::nfreeze (shift) }, + { module => 'Storable.pm', + inflater => sub { Storable::thaw (shift) }, + deflater => sub { die "Expecting a reference" unless (ref $_[0]); Storable::nfreeze (shift) }, }, ); @@ -25,14 +25,13 @@ my $selected; foreach my $serializer (@serializers) { eval { require $serializer->{module} }; unless ($@) { - $selected = $serializer; - last; + $selected = $serializer; + last; } } plan (skip_all => "No suitable serializer found") unless $selected; -plan (tests => 11); DBICTest::Schema::Serialized->inflate_column( 'serialized', { inflate => $selected->{inflater}, deflate => $selected->{deflater}, @@ -42,17 +41,17 @@ Class::C3->reinitialize; my $struct_hash = { a => 1, - b => [ + b => [ { c => 2 }, ], d => 3, }; my $struct_array = [ - 'a', - { - b => 1, - c => 2 + 'a', + { + b => 1, + c => 2, }, 'd', ]; @@ -63,7 +62,6 @@ my $inflated; #======= testing hashref serialization my $object = $rs->create( { - id => 1, serialized => '', } ); ok($object->update( { serialized => $struct_hash } ), 'hashref deflation'); @@ -71,7 +69,6 @@ ok($inflated = $object->serialized, 'hashref inflation'); is_deeply($inflated, $struct_hash, 'inflated hash matches original'); $object = $rs->create( { - id => 2, serialized => '', } ); eval { $object->set_inflated_column('serialized', $struct_hash) }; @@ -98,3 +95,5 @@ $object->make_column_dirty('serialized'); $object->update; is_deeply ($rs->first->serialized, { x => 'z' }, 'changes made it to the db' ); + +done_testing;