| Siesta documentation | Contained in the Siesta distribution. |
Siesta::Deferred - a deferred message in the system
release a deferred message and continue it's processing
| Siesta documentation | Contained in the Siesta distribution. |
use strict; package Siesta::Deferred; use base qw( Siesta::DBI ); __PACKAGE__->set_up_table('deferred'); __PACKAGE__->has_a(who => 'Siesta::Member' ); __PACKAGE__->has_a(message => 'Siesta::Message', deflate => 'as_string', );
sub resume { my $self = shift; my $mail = $self->message; $mail->plugins([ map { Siesta::Plugin->retrieve( $_ )->promote } split /,/, $self->plugins ]); $self->delete; $mail->process; } 1;