projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
611495f
)
Remove trailing dots in t/porting/readme.t on VMS.
author
Craig A. Berry
<craigberry@mac.com>
Sun, 7 Jul 2013 19:28:21 +0000
(14:28 -0500)
committer
Craig A. Berry
<craigberry@mac.com>
Sun, 7 Jul 2013 20:09:39 +0000
(15:09 -0500)
Because on VMS a zero-length extension still has a dot.
t/porting/readme.t
patch
|
blob
|
history
diff --git
a/t/porting/readme.t
b/t/porting/readme.t
index
505e1e3
..
621643f
100644
(file)
--- a/
t/porting/readme.t
+++ b/
t/porting/readme.t
@@
-31,6
+31,7
@@
while(<$fh>) {
for my $file (@porting_files) {
$file =~ s!^Porting/!!;
+ $file =~ s/\.\z// if $^O eq 'VMS';
next if $file =~ /^perl[0-9]+delta\.pod$/;
ok(exists($files_in_pod{$file}), "$file is mentioned in Porting/README.pod");
delete $files_in_pod{$file};