feat: provide full message to minion
This commit is contained in:
parent
973445a7d8
commit
1d041b453b
@ -60,7 +60,13 @@ sub queue
|
||||
{
|
||||
my ($self, $transaction, $rcpt) = @_;
|
||||
|
||||
$self->{minion}->enqueue(transmit => [$rcpt] => {
|
||||
my $data = {};
|
||||
$data{destination}=$rcpt;
|
||||
$data{header}=$transaction->header->as_string;
|
||||
$data{body}=$transaction->body_as_string;
|
||||
|
||||
|
||||
$self->{minion}->enqueue(transmit => [$data] => {
|
||||
attempts => 10,
|
||||
expire => 60*60*24*2,
|
||||
queue => $rcpt->{destination}
|
||||
|
Loading…
Reference in New Issue
Block a user