first pass RT4 merge, RT#13852
[freeside.git] / rt / t / api / attribute.t
index cb2626a..417f015 100644 (file)
@@ -2,15 +2,15 @@
 use strict;
 use warnings;
 use RT;
-use RT::Test tests => 7;
+use RT::Test nodata => 1, tests => 7;
 
 
 {
 
-my $user = $RT::SystemUser;
+my $user = RT->SystemUser;
 my ($id, $msg) =  $user->AddAttribute(Name => 'SavedSearch', Content => { Query => 'Foo'} );
 ok ($id, $msg);
-my $attr = RT::Attribute->new($RT::SystemUser);
+my $attr = RT::Attribute->new(RT->SystemUser);
 $attr->Load($id);
 is($attr->Name , 'SavedSearch');
 $attr->SetSubValues( Format => 'baz');
@@ -28,15 +28,14 @@ is ($format, undef);
 
 $attr->SetSubValues(Format => 'This is a format');
 
-my $attr2 = RT::Attribute->new($RT::SystemUser);
+my $attr2 = RT::Attribute->new(RT->SystemUser);
 $attr2->Load($id);
 is ($attr2->SubValue('Format'), 'This is a format');
 $attr2->Delete;
-my $attr3 = RT::Attribute->new($RT::SystemUser);
+my $attr3 = RT::Attribute->new(RT->SystemUser);
 ($id) = $attr3->Load($id);
 is ($id, 0);
 
 
 }
 
-1;