Browse files

cleanup the last commit

  • Loading branch information...
1 parent a447cb2 commit 6fc98ef299a15f77455b76e07f1791a562fadde9 @mig0 committed May 13, 2012
Showing with 1 addition and 3 deletions.
  1. +1 −3 inc/My/Builder.pm
View
4 inc/My/Builder.pm
@@ -155,12 +155,10 @@ sub set_file_flags {
sub process_pod_files {
my ($self, $ext) = @_;
- my $method = "find_${ext}_files";
my $files = $self->_find_file_by_type($ext, 'lib');
-
while (my ($file, $dest) = each %$files) {
$dest =~ s!^lib/\Kpods/!!;
- $self->copy_if_modified(from => $file, to => File::Spec->catfile($self->blib, $dest) );
+ $self->copy_if_modified(from => $file, to => File::Spec->catfile($self->blib, $dest));
}
}

0 comments on commit 6fc98ef

Please sign in to comment.