diff options
Diffstat (limited to 't/lib/RTest/InterfaceModel/Reflector/DBIC.pm')
| -rw-r--r-- | t/lib/RTest/InterfaceModel/Reflector/DBIC.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/lib/RTest/InterfaceModel/Reflector/DBIC.pm b/t/lib/RTest/InterfaceModel/Reflector/DBIC.pm index fe1cee6..73effd4 100644 --- a/t/lib/RTest/InterfaceModel/Reflector/DBIC.pm +++ b/t/lib/RTest/InterfaceModel/Reflector/DBIC.pm @@ -195,7 +195,7 @@ sub test_reflect_submodel :Tests{ my %attrs = map { $_->name => $_ } $member->parameter_attributes; my $target; if( $sm eq "Bar"){$target = 4; } - elsif($sm eq "Baz"){$target = 4; } + elsif($sm eq "Baz"){$target = 5; } elsif($sm eq "Foo"){$target = 5; } Test::More::is( scalar keys %attrs, $target, "Correct # of attributes for $sm"); @@ -292,7 +292,7 @@ sub test_reflect_submodel_action :Tests{ my $attr_num; if($action_name =~ /Delete/){next; } elsif($sm eq "Bar"){$attr_num = 4; } - elsif($sm eq "Baz"){$attr_num = 3; } + elsif($sm eq "Baz"){$attr_num = 4; } elsif($sm eq "Foo"){$attr_num = 3; } Test::More::is( scalar keys %attrs, $attr_num, "Correct # of attributes for $sm"); if($attr_num != keys %attrs ){ |