File Coverage

blib/lib/PlugAuth/Lite.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 16 87.5


line stmt bran cond sub pod time code
1             package PlugAuth::Lite;
2              
3 1     1   642 use strict;
  1         1  
  1         30  
4 1     1   5 use warnings;
  1         1  
  1         44  
5 1     1   12 use v5.10;
  1         3  
  1         38  
6 1     1   372 use Mojo::Base qw( Mojolicious );
  0            
  0            
7              
8             # ABSTRACT: Pluggable (lite) authentication and authorization server.
9             our $VERSION = '0.07'; # VERSION
10              
11              
12             has 'auth';
13             has 'authz';
14             has 'host';
15              
16             sub startup
17             {
18             my($self, $config) = @_;
19              
20             $self->plugin('plug_auth_lite',
21             auth => $self->auth // sub { 0 },
22             authz => $self->authz // sub { 1 },
23             host => $self->host // sub { 0 },
24             );
25             }
26              
27             1;
28              
29             __END__