summaryrefslogtreecommitdiff
path: root/lib/File/Path.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/File/Path.pm')
-rw-r--r--lib/File/Path.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/File/Path.pm b/lib/File/Path.pm
index 62f3b504bb..2e35303bb3 100644
--- a/lib/File/Path.pm
+++ b/lib/File/Path.pm
@@ -156,7 +156,7 @@ sub rmtree {
print "unlink $root\n" if $verbose;
while (-e $root || -l $root) { # delete all versions under VMS
(unlink($root) && ++$count)
- or carp "Can't unlink file $root: $!";
+ or croak "Can't unlink file $root: $!";
}
}
}