File Coverage

blib/lib/Module/Install/InlineModule.pm

Criterion	Covered	Total	%
statement	12	19	63.1
branch			n/a
condition			n/a
subroutine	4	5	80.0
pod	0	1	0.0
total	16	25	64.0

use strict; use warnings;
package Module::Install::InlineModule;
our $VERSION = '0.02';

use base 'Module::Install::Base';
use Inline::Module();

sub inline {
    my ($self, %args) = @_;

    my $meta = \%args;
    my $makemaker = {};
    my $postamble = Inline::Module::postamble(
        $makemaker,
        inline => $meta,
    );
    $self->postamble($postamble);
    for my $module (Inline::Module->included_modules($meta)) {
        $self->include($module);
    }
}

1;