summaryrefslogtreecommitdiff
path: root/rt/t/mail/one-time-recipients.t
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/mail/one-time-recipients.t')
-rw-r--r--rt/t/mail/one-time-recipients.t22
1 files changed, 22 insertions, 0 deletions
diff --git a/rt/t/mail/one-time-recipients.t b/rt/t/mail/one-time-recipients.t
index 1bc172d..bdbcc52 100644
--- a/rt/t/mail/one-time-recipients.t
+++ b/rt/t/mail/one-time-recipients.t
@@ -89,6 +89,28 @@ warnings_are {
);
ok $status, "replied to a ticket";
} { Cc => 'test@localhost' };
+}[];
+
+diag "Reply to ticket with multiple requestors squelched";
+warnings_are {
+ my $ticket = RT::Ticket->new( RT::CurrentUser->new( $user ) );
+ mail_ok {
+ my ($status, undef, $msg) = $ticket->Create(
+ Queue => $queue->id,
+ Subject => 'test squelch',
+ Requestor => ['test@localhost','bob@localhost','fred@localhost' ],
+ );
+ ok $status, "created ticket";
+ } { To => 'bob@localhost, fred@localhost, test@localhost' };
+
+ mail_ok {
+ my ($status,$msg) = $ticket->Correspond(
+ Content => 'squelched email',
+ SquelchMailTo => ['bob@localhost', 'fred@localhost'],
+ );
+ ok $status, "replied to a ticket";
+ } { To => 'test@localhost' };
+
} [];
diag "Reply to ticket with requestor squelched";