File Coverage

blib/lib/ColorThemeRole/ANSI.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 23 23 100.0


line stmt bran cond sub pod time code
1             package ColorThemeRole::ANSI;
2              
3             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
4             our $DATE = '2020-06-09'; # DATE
5             our $DIST = 'ColorThemeRole-ANSI'; # DIST
6             our $VERSION = '0.001'; # VERSION
7              
8 1     1   460 use 5.010001;
  1         3  
9 1     1   4 use strict;
  1         1  
  1         17  
10 1     1   4 use warnings;
  1         1  
  1         20  
11              
12 1     1   4 use Role::Tiny;
  1         2  
  1         4  
13              
14 1     1   537 use ColorThemeUtil::ANSI ();
  1         323  
  1         53  
15              
16             sub get_item_color_as_ansi {
17 1     1 1 279 my $self = shift;
18 1         6 ColorThemeUtil::ANSI::item_color_to_ansi($self->get_item_color(@_));
19             }
20              
21             1;
22             # ABSTRACT: Roles for using ColorTheme::* with ANSI codes
23              
24             __END__