Skip to content

Commit

Permalink
Revert "File::Path provides rmtree, not remove_tree"
Browse files Browse the repository at this point in the history
Mea culpa -- File::Path advertises remove_tree in 2.06 and higher,
which is what the Makefile asks for.

This reverts commit ab07f41.
  • Loading branch information
alexmv committed Dec 5, 2009
1 parent f749d3d commit 3f377d2
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions lib/Test/Chimps/Smoker/SVN.pm
Expand Up @@ -5,7 +5,7 @@ use warnings;
use base qw(Test::Chimps::Smoker::Source);
__PACKAGE__->mk_ro_accessors(qw/uri/);

use File::Path qw(rmtree);
use File::Path qw(remove_tree);

sub revision_info {
my $self = shift;
Expand Down Expand Up @@ -55,7 +55,7 @@ sub clean {
or die "Can't call program `svn status .`: $!";
while ( my $s = <$status_fh> ) {
next unless my ($path) = ($s =~ /^\?\s*(.*)$/);
rmtree( File::Spec->catdir($self->directory, $path) );
remove_tree( File::Spec->catdir($self->directory, $path) );
}
}

Expand Down

0 comments on commit 3f377d2

Please sign in to comment.