File Coverage

blib/lib/Mojolicious/Plugin/VHost.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch	1	2	50.0
condition	1	2	50.0
subroutine	3	3	100.0
pod	1	1	100.0
total	21	23	91.3

package Mojolicious::Plugin::VHost;
use Mojo::Base 'Mojolicious::Plugin';

our $VERSION = '0.04';

sub register {
    my ($plugin, $app) = @_;

    my %defaults = (
        routes => $app->routes->namespaces,
        static => $app->static->paths,
        templates => $app->renderer->paths,
    );

    $app->hook(
        before_dispatch => sub {
            my $c = shift;

            my $host = $c->tx->req->headers->host;

            my $hosts = $c->app->config('VHost') || {};
            my %conf = ( %defaults, %{$hosts->{$host} || {}} );

            my $app = $c->app;
            $app->routes->namespaces($conf{routes});
            $app->static->paths($conf{static});
            $app->renderer->paths($conf{templates});
        }
    );
}

1;
__END__