summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--t/porting/podcheck.t1
1 files changed, 1 insertions, 0 deletions
diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t
index 6e77b78635..f0d5811a0c 100644
--- a/t/porting/podcheck.t
+++ b/t/porting/podcheck.t
@@ -1276,6 +1276,7 @@ sub is_pod_file {
my $filename = $File::Find::name;
+ # $filename is relative, like './path'. Strip that initial part away.
# Assumes that the path separator is exactly one character.
$filename =~ s/^\..//;