Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

redo regexp without \K, not to require 5.10.0

  • Loading branch information...
commit a2c98bff2ba2066b8da0435e96f429d90d5ba55f 1 parent 12ec6ef
@mig0 authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  inc/My/Builder.pm
View
2  inc/My/Builder.pm
@@ -157,7 +157,7 @@ sub process_pod_files {
my $files = $self->_find_file_by_type($ext, 'lib');
while (my ($file, $dest) = each %$files) {
- $dest =~ s!^lib/\Kpods/!!;
+ $dest =~ s!^(lib/)pods/!$1!;
$self->copy_if_modified(from => $file, to => File::Spec->catfile($self->blib, $dest));
}
}
Please sign in to comment.
Something went wrong with that request. Please try again.