X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Ft%2Fshredder%2F02group_member.t;h=692d361d34ec17152ef486ad00af0088103d136f;hb=de9d037528895f7151a9aead6724ce2df95f9586;hp=87d1e3ce774ef084752f7158a2863241401632c7;hpb=1c538bfabc2cd31f27067505f0c3d1a46cba6ef0;p=freeside.git

diff --git a/rt/t/shredder/02group_member.t b/rt/t/shredder/02group_member.t
index 87d1e3ce7..692d361d3 100644
--- a/rt/t/shredder/02group_member.t
+++ b/rt/t/shredder/02group_member.t
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 use Test::Deep;
-use RT::Test::Shredder tests => 34;
+use RT::Test::Shredder tests => 35;
 my $test = "RT::Test::Shredder";
 
 ### nested membership check
@@ -38,8 +38,21 @@ my $test = "RT::Test::Shredder";
         $members->Limit( FIELD => 'GroupId', VALUE => $cgid );
         is( $members->Count, 1, "find membership record" );
 
+        my $transactions = RT::Transactions->new(RT->SystemUser);
+        $transactions->_OpenParen('member');
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'Type', VALUE => 'AddMember');
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'Field', VALUE => $user->PrincipalObj->id, ENTRYAGGREGATOR => 'AND' );
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'ObjectId', VALUE => $cgroup->id, ENTRYAGGREGATOR => 'AND' );
+        $transactions->_CloseParen('member');
+        $transactions->_OpenParen('member');
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'Type', VALUE => 'AddMembership');
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'Field', VALUE => $cgroup->PrincipalObj->id, ENTRYAGGREGATOR => 'AND' );
+        $transactions->Limit( SUBCLAUSE => 'member', FIELD => 'ObjectId', VALUE => $user->id, ENTRYAGGREGATOR => 'AND' );
+        $transactions->_CloseParen('member');
+        is( $transactions->Count, 2, "find membership transaction records" );
+
         my $shredder = $test->shredder_new();
-        $shredder->PutObjects( Objects => $members );
+        $shredder->PutObjects( Objects => [$members, $transactions] );
         $shredder->WipeoutAll();
         $test->db_is_valid;
         cmp_deeply( $test->dump_current_and_savepoint('buadd'), "current DB equal to savepoint");