File Coverage

blib/lib/DDG/IsControllable.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 DDG::IsControllable;
2             our $AUTHORITY = 'cpan:DDG';
3             # ABSTRACT: Role for data managed inside the DuckDuckGo infrastructure
4             $DDG::IsControllable::VERSION = '1016';
5 12     12   5038 use Moo::Role;
  12         43  
  12         65  
6              
7              
8             has is_cached => (
9             is => 'ro',
10             default => sub { shift->isa('DDG::ZeroClickInfo::Spice') ? 1 : 0 },
11             );
12              
13              
14             has is_unsafe => (
15             is => 'ro',
16             default => sub { 0 },
17             );
18              
19              
20             has ttl => (
21             is => 'ro',
22             predicate => 'has_ttl',
23             );
24              
25              
26             has caller => (
27             is => 'ro',
28             predicate => 'has_caller',
29             );
30              
31              
32             1;
33              
34             __END__