|
- . $self->editor_links( join("", $self->warnings ) )
- . qq|
|
+ .= qq|warn|
+ . $self->editor_links(
+ join("", map {
+ warn "# $_";
+ my $style = '';
+ $style = $warn_colors->{$1}
+ ? ' style="color:' . $warn_colors->{$1} . '"'
+ : ''
+ if m{^(#+)};
+ qq|$_ but CSS hates me
+ } $self->warnings )
+ )
+ . qq|
|
if $self->warnings;
my ($exit,$description) = ('exit','stop server');