X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Ft%2Fcustomfields%2Fexternal.t;h=4b84144ee88b16070d3ebf1f692645a782c261eb;hb=1c538bfabc2cd31f27067505f0c3d1a46cba6ef0;hp=73549166a82c5528bf64af4596c427a4e9f6dcda;hpb=4f5619288413a185e9933088d9dd8c5afbc55dfa;p=freeside.git diff --git a/rt/t/customfields/external.t b/rt/t/customfields/external.t index 73549166a..4b84144ee 100644 --- a/rt/t/customfields/external.t +++ b/rt/t/customfields/external.t @@ -3,7 +3,7 @@ use warnings; use strict; use RT; -use RT::Test nodata => 1, tests => 13; +use RT::Test nodata => 1, tests => undef; sub new (*) { my $class = shift; @@ -51,6 +51,10 @@ isa_ok( $cf, 'RT::CustomField' ); } ok( !$failure, "all values have name" ); is( $values->Count, $count, "count is correct" ); + is( $values->CustomFieldObject->id, $cf->id, "Values stored the CF id" ); + is( $values->CustomFieldObject, $cf, "Values stored the identical CF object" ); + is( $values->First->CustomFieldObj->id, $cf->id, "A value stored the CF id" ); + is( $values->First->CustomFieldObj, $cf, "A value stored the identical CF object" ); } { @@ -59,3 +63,5 @@ isa_ok( $cf, 'RT::CustomField' ); ($ret, $msg) = $cf->SetValuesClass('RT::CustomFieldValues::Groups'); ok $ret, 'Reverting this CF as external source values based' or diag "error: $msg"; } + +done_testing;