We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 51515e7 commit 4bed883Copy full SHA for 4bed883
bin/genhtml
@@ -11309,8 +11309,12 @@ sub write_source_line(*$$$$$$$)
11309
if ($mc) {
11310
# space over far enough to line up with MC/DC extension column
11311
# remove the span and other HTML
11312
- (my $s = $br) =~ s/(<\/span>|<span.+?>)//g;
+ my $s = $br;
11313
+ foreach my $tag ('a', 'span') {
11314
+ $s =~ s/(<\/$tag>|<$tag.+?>)//g;
11315
+ }
11316
$br .= ' ' x ($br_field_width - length($s)) . ' ';
11317
+ die("unexpected lengths") unless $br_field_width >= length($s);
11318
}
11319
write_html($handle,
11320
"$html_continuation_leader$lineNumSpan" .
0 commit comments