This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b7e2b69
)
use the right default for MAP
author
Jesse Luehrs
<doy@tozt.net>
Mon, 18 Jun 2012 22:30:07 +0000
(17:30 -0500)
committer
Jesse Luehrs
<doy@tozt.net>
Mon, 18 Jun 2012 22:39:29 +0000
(17:39 -0500)
Porting/sync-with-cpan
patch
|
blob
|
blame
|
history
diff --git
a/Porting/sync-with-cpan
b/Porting/sync-with-cpan
index
0ccd6d9
..
46eee54
100755
(executable)
--- a/
Porting/sync-with-cpan
+++ b/
Porting/sync-with-cpan
@@
-268,6
+268,9
@@
FILE: for my $file ( `find $new_dir -type f` ) {
last if $file =~ s/^$key/$val/;
}
}
+ else {
+ $file = $files[0] . '/' . $file;
+ }
if ( $file =~ m{^cpan/} ) {
$file =~ s{^cpan/}{};