From: Dean Roehrich <roehrich@cray.com>
Date: Wed, 7 Feb 1996 00:04:39 +0000 (-0600)
Subject: beta3 File::Path warning fix
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7301ec2d97fd50b6d373cbd18cec2037f8286ffa;p=p5sagit%2Fp5-mst-13.2.git

beta3 File::Path warning fix

The following patch fixes a warning from File::Path.  Apply over beta3.
---

diff --git a/lib/File/Path.pm b/lib/File/Path.pm
index 05c5bd9..6cb675b 100644
--- a/lib/File/Path.pm
+++ b/lib/File/Path.pm
@@ -120,7 +120,8 @@ sub mkpath{
 
 sub rmtree {
     my($roots, $verbose, $safe) = @_;
-    my(@files,$count);
+    my(@files);
+    my($count) = 0;
     $roots = [$roots] unless ref $roots;
 
     foreach $root (@{$roots}) {