File Coverage

lib/Mojolicious/Plugin/Module/Assets.pm

Criterion	Covered	Total	%
statement	22	22	100.0
branch	3	4	75.0
condition	1	3	33.3
subroutine	6	6	100.0
pod	0	1	0.0
total	32	36	88.8

package Mojolicious::Plugin::Module::Assets;
use Mojo::Base -base;
use Mojo::Util qw/decamelize/;
use File::Copy::Recursive qw/dircopy/;
use FindBin;
use Carp;

sub init {
  my ($self, $app) = @_;
  # Does not support Mojolicious Lite.
  return if $app->isa('Mojolicious::Lite');
  my $app_path = $app->home;
  while (my($name, $mod) = each %{ $app->module->modules }) {
    my $path = $mod->config->{path};
    dircopy("$path/assets", "$app_path/public/assets") or
      croak("Can't copy $path/assets to $app_path/public") if -d "$path/assets";
  }
}

1;

__END__