diff options
| author | Robin Houston <robin@cpan.org> | 2001-05-06 15:40:51 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-06 13:51:49 +0000 |
| commit | 3827f17e1a3ba75532f089723508d3300b6b7744 (patch) | |
| tree | 2395dcfe94abbf3694d9a3ff663c7ebd8b9423b5 /t/pod | |
| parent | ce4e655dc29e27029ad1ce2f03223f9feef69025 (diff) | |
| download | perl-3827f17e1a3ba75532f089723508d3300b6b7744.tar.gz | |
Give deparse tester a chance
Message-ID: <20010506144051.A6279@penderel>
p4raw-id: //depot/perl@10008
Diffstat (limited to 't/pod')
| -rw-r--r-- | t/pod/testp2pt.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/pod/testp2pt.pl b/t/pod/testp2pt.pl index 8cfdbb9386..735350ff40 100644 --- a/t/pod/testp2pt.pl +++ b/t/pod/testp2pt.pl @@ -156,7 +156,7 @@ sub testpodplaintext( @ ) { for $podfile (@testpods) { ($testname, $_) = fileparse($podfile); $testdir ||= $_; - $testname =~ s/\.t$//; + $testname =~ s/\..*$//; $cmpfile = $testdir . $testname . '.xr'; $outfile = $testdir . $testname . '.OUT'; |