diff options
author | Dylan William Hardison <dylan@hardison.net> | 2018-08-09 04:36:24 +0200 |
---|---|---|
committer | Dylan William Hardison <dylan@hardison.net> | 2018-08-20 23:52:52 +0200 |
commit | 50d22b447383e9ac2a88dde5a61cb4eeaf83236f (patch) | |
tree | fc83f940732c345650e21d86d7d351fe986a7d62 | |
parent | f2f8c5e6532db45adab694846237992dc6b498e8 (diff) | |
download | bugzilla-50d22b447383e9ac2a88dde5a61cb4eeaf83236f.tar.gz bugzilla-50d22b447383e9ac2a88dde5a61cb4eeaf83236f.tar.xz |
one more slurpy type
-rw-r--r-- | Bugzilla/Quantum/SES.pm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/Bugzilla/Quantum/SES.pm b/Bugzilla/Quantum/SES.pm index 4badbc247..824ce58d3 100644 --- a/Bugzilla/Quantum/SES.pm +++ b/Bugzilla/Quantum/SES.pm @@ -125,12 +125,16 @@ my $BouncedRecipients = ArrayRef[ slurpy Any, ], ]; -my $BounceNotification = Dict[ - bounce => Dict[ +my $BounceNotification = Dict [ + bounce => Dict [ bouncedRecipients => $BouncedRecipients, - reportingMTA => Str, + reportingMTA => Str, + bounceSubType => Str, + bounceType => Str, + slurpy Any, ], ]; + sub _process_bounce { state $check = compile($Invocant, $BounceNotification); my ($self, $notification) = $check->(@_); |