File Coverage

blib/lib/Class/Delay/Message.pm

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod	0	1	0.0
total	15	16	93.7

use strict;
package Class::Delay::Message;
use base 'Class::Accessor::Fast';
__PACKAGE__->mk_accessors(qw( package method args is_trigger ));

sub resume {
    my $self = shift;
    my @args = @{ $self->args };
    my $invocant = shift @args;
    my $method   = $self->method;
    $invocant->$method( @args );
}

1;
__END__