Class::Workflow::State::AutoApply - Automatically apply a transition upon arriving into a state. |
Class::Workflow::State::AutoApply - Automatically apply a transition upon arriving into a state.
package MyState; use Moose;
with qw/Class::Workflow::State::AutoApply/; my $state = Mystate->new( auto_transition => $t );
my $i2 = $state->accept_instance( $i, @args ); # automatically calls $t->apply( $i, @args )
This state role is used to automatically apply a transition
If an auto-application may fail validation or something of the sort you can do something like:
around apply_auto_transition => sub { my $next = shift; my ( $self, $instance, @args ) = @_;
eval { $self->$next( $instance, @args ) }
die $@ unless $@->isa("SoftError"); }
If apply_auto_transition returns a false value then the original instance will be returned automatically, at which point the intermediate state is the current state.
Class::Workflow::State::AutoApply - Automatically apply a transition upon arriving into a state. |