File Coverage

blib/lib/ColorTheme/Test/Static.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 ColorTheme::Test::Static;
2              
3             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
4             our $DATE = '2020-06-19'; # DATE
5             our $DIST = 'ColorThemeBase-Static'; # DIST
6             our $VERSION = '0.008'; # VERSION
7              
8 1     1   375 use strict;
  1         2  
  1         23  
9 1     1   5 use warnings;
  1         1  
  1         21  
10 1     1   4 use parent 'ColorThemeBase::Static::FromStructColors';
  1         1  
  1         4  
11 1     1   478 use Color::RGB::Util 'rand_rgb_color';
  1         3022  
  1         127  
12              
13             our %THEME = (
14             v => 2,
15             summary => 'A static color theme',
16             items => {
17             color1 => 'ff0000',
18             color2 => '00ff00',
19             color3 => {bg=>'0000ff'},
20             color4 => {fg=>'000000', bg=>'ffffff'},
21             color5 => sub {
22             +{
23             summary => 'A random foreground color',
24             fg => rand_rgb_color(),
25             };
26             },
27             },
28             );
29              
30             1;
31             # ABSTRACT: A static color theme
32              
33             __END__