diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2009-07-10 20:42:51 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2009-07-10 20:42:51 +0000 |
commit | 99535516a8275b3c98a90cb037d2c88219c2b756 (patch) | |
tree | 66dadc45c8914b3d3d0d2949c277c5514bcf3c46 /t/lib/RTest/InterfaceModel | |
parent | ad0b52c377cccb45543fbd76d2e85288dfe4045e (diff) | |
download | reaction-99535516a8275b3c98a90cb037d2c88219c2b756.tar.gz reaction-99535516a8275b3c98a90cb037d2c88219c2b756.zip |
String fragment viewport
Diffstat (limited to 't/lib/RTest/InterfaceModel')
-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 ){ |