sub TicketState::New::next_action { 'send_ticket_to_supervisor' }

sub TicketState::Pending::next_action { 'send_to_editorial_group' }

sub TicketState::do_next_thing {
    my $self = shift;
    my $action = $self->next_action;
    $self->$action(@_);
}