From 1c538bfabc2cd31f27067505f0c3d1a46cba6ef0 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Thu, 9 Jul 2015 22:18:55 -0700 Subject: RT 4.2.11, ticket#13852 --- rt/t/customfields/external.t | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'rt/t/customfields/external.t') 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; -- cgit v1.2.1