File Coverage

blib/lib/WWW/Asana/Role/CanReload.pm

Criterion	Covered	Total	%
statement	4	8	50.0
branch			n/a
condition			n/a
subroutine	2	4	50.0
pod	0	2	0.0
total	6	14	42.8

package WWW::Asana::Role::CanReload;
BEGIN {
  $WWW::Asana::Role::CanReload::AUTHORITY = 'cpan:GETTY';
}
{
  $WWW::Asana::Role::CanReload::VERSION = '0.003';
}
# ABSTRACT: Role for Asana classes which can be reloaded

use MooX::Role;

requires qw(
	own_base_args
	reload_base_args
);

sub reload_args {
	my ( $self ) = @_;
	$self->reload_base_args, $self->own_base_args;
}

sub reload {
	my $self = shift;
	$self->do($self->reload_args(@_));
}

1;
__END__