|
99
|
1 |
10 |
0 |
$self->{'_all_styles'} ||= do {
my $parser = $self->ansi_parser;
my $styles = {'bold', {'font-weight', 'bold'}, 'dark', {'opacity', '0.7'}, 'underline', {'text-decoration', 'underline'}, 'concealed', {'visibility', 'hidden'}};
{
my $i = 0;
foreach my $fg ($parser->foreground_colors) {
$styles->{$fg} = {'color', $ALLCOLORS[$i++]};
} ;
$i = 0;
foreach my $bg ($parser->background_colors) {
$styles->{$bg} = {'background-color', $ALLCOLORS[$i++]};
} ;
} ;
+{%$styles, %{{} unless $self->{'styles'};}}
} |