File Coverage

blib/lib/Net/LCDproc/Widget/String.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Net::LCDproc::Widget::String;
2             $Net::LCDproc::Widget::String::VERSION = '0.104';
3             #ABSTRACT: show regular strings
4              
5 1     1   13 use v5.10.2;
  1         3  
  1         54  
6 1     1   8 use Types::Standard qw/Int Str/;
  1         2  
  1         13  
7 1     1   661 use Moo;
  1         1  
  1         7  
8 1     1   353 use namespace::clean;
  1         1  
  1         9  
9              
10             extends 'Net::LCDproc::Widget';
11             with 'Net::LCDproc::Role::Widget';
12              
13             has text => (
14             is => 'rw',
15             isa => Str,
16             required => 1,
17             trigger => \&_set_attr,
18             );
19              
20             has ['x', 'y'] => (
21             is => 'rw',
22             isa => Int,
23             required => 1,
24             trigger => \&_set_attr,
25             );
26              
27             has '+_set_cmd' => ( default => sub { [qw/ x y text /] } );
28              
29             1;
30              
31             __END__