File Coverage

blib/lib/WWW/Picnic/Result/User.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package WWW::Picnic::Result::User;
2             our $VERSION = '0.100';
3             our $AUTHORITY = 'cpan:GETTY';
4             # ABSTRACT: Picnic user account information
5              
6 2     2   13 use Moo;
  2         4  
  2         19  
7              
8             extends 'WWW::Picnic::Result';
9              
10              
11             has user_id => (
12             is => 'ro',
13             lazy => 1,
14             default => sub { shift->_get('user_id') },
15             );
16              
17              
18             has firstname => (
19             is => 'ro',
20             lazy => 1,
21             default => sub { shift->_get('firstname') },
22             );
23              
24              
25             has lastname => (
26             is => 'ro',
27             lazy => 1,
28             default => sub { shift->_get('lastname') },
29             );
30              
31              
32             has contact_email => (
33             is => 'ro',
34             lazy => 1,
35             default => sub { shift->_get('contact_email') },
36             );
37              
38              
39             has phone => (
40             is => 'ro',
41             lazy => 1,
42             default => sub { shift->_get('phone') },
43             );
44              
45              
46             has customer_type => (
47             is => 'ro',
48             lazy => 1,
49             default => sub { shift->_get('customer_type') },
50             );
51              
52              
53             has address => (
54             is => 'ro',
55             lazy => 1,
56             default => sub { shift->_get('address') },
57             );
58              
59              
60             has household_details => (
61             is => 'ro',
62             lazy => 1,
63             default => sub { shift->_get('household_details') },
64             );
65              
66              
67             has feature_toggles => (
68             is => 'ro',
69             lazy => 1,
70             default => sub { shift->_get('feature_toggles') || [] },
71             );
72              
73              
74             has subscriptions => (
75             is => 'ro',
76             lazy => 1,
77             default => sub { shift->_get('subscriptions') || [] },
78             );
79              
80              
81             1;
82              
83             __END__