File Coverage

blib/lib/Articulate/Service/LoginForm.pm
Criterion Covered Total %
statement 12 15 80.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 21 76.1


line stmt bran cond sub pod time code
1             package Articulate::Service::LoginForm;
2              
3 1     1   1277 use strict;
  1         2  
  1         38  
4 1     1   6 use warnings;
  1         2  
  1         31  
5              
6 1     1   6 use Articulate::Syntax;
  1         2  
  1         67  
7              
8 1     1   2088 use Moo;
  1         3  
  1         6  
9             with 'Articulate::Role::Service';
10              
11              
12             sub handle_login_form {
13 0     0 0   my $self = shift;
14 0           my $request = shift;
15 0           return response 'form/login', {
16             form => { },
17             };
18             }
19              
20             1;