File Coverage

blib/lib/Mojolicious/Plugin/ServerType.pm

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition	1	2	50.0
subroutine	4	4	100.0
pod	1	1	100.0
total	18	19	94.7

package Mojolicious::Plugin::ServerType;

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

our $VERSION = "0.02";

sub register {
    my ($self, $app, $conf) = (@_);
    $conf ||= {};

    $app->helper(
        server_type => sub {
            return undef;
        }
    );

    $app->hook( before_server_start => sub {
        my ( $server, $app ) = @_;

        my $serverType = ref $server;

        $app->helper(
            server_type => sub {
                return $serverType;
            }
        );
    });
}


1;
__END__