|
109
|
1 |
11 |
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'};}}
} |