view release on metacpan or  search on metacpan

share/flavor/Minimum/builder/MyBuilder.pm  view on Meta::CPAN

# Module:::Build's share_dir handling is not good for me.
# We need to install 'tmpl' directories to '$DIST_DIR/tmpl'. But M::B doesn't support it.
sub ACTION_code {
    my $self = shift;
    my $share_prefix = File::Spec->catdir($self->blib, qw/lib auto share dist/, '<% $dist %>');
    for my $dir (qw(tmpl static)) {
        next unless -d $dir;
        for my $src (@{$self->rscan_dir($dir)}) {
            next if -d $src;
            $self->copy_if_modified(
                from => $src,
                to_dir => File::Spec->catfile( $share_prefix )
            );
        }
    }
    $self->SUPER::ACTION_code();
}

1;