From 3673acb0ce592432c7547e7ee9d7e5667a2f7bb2 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Sat, 28 Jan 2012 15:25:47 -0700 Subject: [PATCH] podcheck.t: Add comment --- t/porting/podcheck.t | 1 + 1 file changed, 1 insertion(+) diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t index 6e77b78..f0d5811 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/^\..//; -- 1.8.3.1