[Rt-commit] rt branch, 4.2/create-squelching-with-tests, updated. rt-4.2.10-2-gd0e2bd3

[Dave Goehrig]

The branch, 4.2/create-squelching-with-tests has been updated
       via  d0e2bd33a92b1de7efed92adfc24bc900da69c2a (commit)
      from  47663a6a8aa54b2a3b59e39cec22247e43632b32 (commit)

Summary of changes:
 t/api/ticket.t | 9 +++++++++
 1 file changed, 9 insertions(+)

- Log -----------------------------------------------------------------
commit d0e2bd33a92b1de7efed92adfc24bc900da69c2a
Author: Dave Goehrig <dave at bestpractical.com>
Date:   Thu Jan 5 12:53:23 2017 -0500

    Adding more ticket creation with squelching tests

diff --git a/t/api/ticket.t b/t/api/ticket.t
index eee865b..cfba3e9 100644
--- a/t/api/ticket.t
+++ b/t/api/ticket.t
@@ -185,6 +185,15 @@ is($#returned, 1, "The ticket has two squelched recipients, multiple args");
 @returned = $t->SquelchMailTo('third at example.com');
 is($#returned, 2, "The ticket has three squelched recipients, additive calls");
 
+my $t2 = RT::Ticket->new(RT->SystemUser);
+ok($t2->Create(Queue => 'general', Subject => 'SquelchTest', SquelchMailTo => [ 'nobody at example.com', 'test at example.com' ]));
+my @returned2 = $t2->SquelchMailTo();
+is($#returned2,1, "The ticket has two squelched recipients");
+
+$t2->SquelchMailTo('test at example.com');
+my @returned3 = $t2->SquelchMailTo();
+is($#returned2,1, "The ticket still has two squelched recipients, no duplicate squelchers");
+
 }
 
 {

-----------------------------------------------------------------------