Skip to content

Commit 8dfc361

Browse files
committed
podcheck.t - make error message less confusing
podcheck.t assumes all non =head text will be indented at least 4 spaces, but this wasn't explicit in the output from podcheck for verbatim line length checks.
1 parent 20616d5 commit 8dfc361

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

t/porting/podcheck.t

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1135,7 +1135,8 @@ package My::Pod::Checker { # Extend Pod::Checker
11351135
11361136
$self->poderror({ -line => $start_line{$addr} + $i,
11371137
-msg => $line_length,
1138-
parameter => "+$exceeds (including " . ($indent - $INDENT) . " from =over's)",
1138+
parameter => "+$exceeds (including " . ($indent - $INDENT) .
1139+
" from =over's and $INDENT as base indent)",
11391140
});
11401141
}
11411142

0 commit comments

Comments
 (0)