X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F46relationships_multi_m2m.t;h=f7afb6f18e78b4f5623f45b260645410eb0a810c;hb=fc97257196b3cdd3df97526e2545a05d1e7c2b96;hp=3f1773c98eda16bdd1c9b622a3685d61f8cdf30e;hpb=da7342aeb23b35c714f73ebb732cb348045a374a;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/46relationships_multi_m2m.t b/t/46relationships_multi_m2m.t index 3f1773c..f7afb6f 100644 --- a/t/46relationships_multi_m2m.t +++ b/t/46relationships_multi_m2m.t @@ -35,7 +35,7 @@ my $schema_counter = 0; "link_class"; like $args->{link_moniker}, qr/\AFooBar(?:One|Two)\z/, "link_moniker"; - like $args->{link_rel_name}, qr/\Afoo_bar_(?:ones|twoes)\z/, + like $args->{link_rel_name}, qr/\Afoo_bar_(?:ones|twos)\z/, "link_rel_name"; return $args->{name}."_".(split /_/, $args->{link_rel_name})[-1]; @@ -45,7 +45,7 @@ my $schema_counter = 0; foreach ([qw(Foo bars)], [qw(Bar foos)]) { my ($source, $rel) = @{$_}; my $row = $submap->resultset($source)->find(1); - foreach ([ones => 1], [twoes => 2]) { + foreach ([ones => 1], [twos => 2]) { my ($link, $count) = @{$_}; my $m2m = "${rel}_${link}"; can_ok $row, $m2m;