but CSS hates me
+
+ $msg = $self->html_escape( $msg );
+
+ if ( my $class = $level_to_class->{ $level } ) {
+ $msg = qq|$msg|;
+ }
+
+ #$msg .= $spacer . qq|$line\n|;
+ $msg = qq|$line$msg|
+ . ( $spacer ? $spacer : '' )
+ . "\n"; # XXX needs this
+
+ $warnings[ $pos++ % $max ] = $msg;
}
}
+ warn "log has $line lines tell position ",tell($log);
close($log) || die "can't close $path: $!";
my $size = -s $path;
- my $warnings = join('',
- map { $warnings[ ( $pos + $_ ) % $max ] || '' } 0 .. $max
+ my $warnings = join("",
+ map { $warnings[ ( $pos + $_ ) % $max ] || '' } 0 .. ( $max - 1 )
);
my $s = length($warnings);
return
- # need to wrap into span so we can have links in warnings
+ # need to wrap editor link into span so we can have links in warnings
qq||
;
}