| MIME-Version: | 1.0 |
| X-Spam-Status: | No, hits=-2.6 required=8.0 tests=BAYES_00,SPF_HELO_PASS,SPF_PASS |
| Content-Disposition: | inline |
| content-type: | text/plain; charset="utf-8" |
| Received: | from x1.develooper.com (x1.develooper.com [63.251.223.170]) by diesel.bestpractical.com (Postfix) with SMTP id 0D70C4D8015 for <bug-File-Path@rt.cpan.org>; Sun, 4 May 2008 21:49:54 -0400 (EDT) |
| Received: | (qmail 2888 invoked from network); 5 May 2008 01:49:54 -0000 |
| Received: | from x16.dev (10.0.100.26) by x1.dev with QMQP; 5 May 2008 01:49:54 -0000 |
| Received: | from londo.c47.org (HELO londo.c47.org) (198.142.1.20) by 16.mx.develooper.com (qpsmtpd/0.43rc1) with ESMTP; Sun, 04 May 2008 18:49:51 -0700 |
| Received: | from bod by londo.c47.org with local (Exim 3.36 #1 (Debian)) id 1Jsppr-0000Wr-00 for <bug-File-Path@rt.cpan.org>; Mon, 05 May 2008 11:49:47 +1000 |
| Delivered-To: | cpan-bug+File-Path@diesel.bestpractical.com |
| Subject: | 2.04: Minor doc typo |
| User-Agent: | Mutt/1.5.17 (2007-11-01) |
| Return-Path: | <bod@londo.c47.org> |
| X-Original-To: | bug-File-Path@rt.cpan.org |
| X-Spam-Check-BY: | 16.mx.develooper.com |
| Date: | Mon, 5 May 2008 11:49:47 +1000 |
| X-Spam-Level: | * |
| Message-Id: | <20080505014947.GA2009@londo.c47.org> |
| To: | bug-File-Path@rt.cpan.org |
| From: | Brendan O'Dea <bod@debian.org> |
| X-RT-Original-Encoding: | us-ascii |
| Content-Length: | 763 |
--- Path.pm.orig 2008-05-05 11:14:41.000000000 +1000
+++ Path.pm 2008-05-05 11:35:44.000000000 +1000
@@ -624,7 +624,7 @@
file, and the value is the error message (usually the contents of
C<$!>). An example usage looks like:
- rmpath( 'foo/bar', 'bar/rat', {error => \my $err} );
+ rmtree( 'foo/bar', 'bar/rat', {error => \my $err} );
for my $diag (@$err) {
my ($file, $message) = each %$diag;
print "problem unlinking $file: $message\n";
@@ -636,7 +636,7 @@
tree that does not exist), the diagnostic key will be empty, only
the value will be set:
- rmpath( '/no/such/path', {error => \my $err} );
+ rmtree( '/no/such/path', {error => \my $err} );
for my $diag (@$err) {
my ($file, $message) = each %$diag;
if ($file eq '') {