diff options
-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->(@_); |