From: Ben Morrow <ben@morrow.me.uk>
Date: Tue, 20 Jan 2009 01:37:31 +0000 (+0000)
Subject: I missed a s/stat_cando/cando/ in File::stat.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=709edd5bfab4664ea90ed1988a3465afffc3420b;p=p5sagit%2Fp5-mst-13.2.git

I missed a s/stat_cando/cando/ in File::stat.
---

diff --git a/lib/File/stat.pm b/lib/File/stat.pm
index 7489605..d0098ba 100644
--- a/lib/File/stat.pm
+++ b/lib/File/stat.pm
@@ -73,7 +73,7 @@ sub _ingroup {
 if (grep $^O eq $_, qw/os2 MSWin32 dos/) {
 
     # from doio.c
-    *stat_cando = sub { ($_[0] & $_[2]->mode) ? 1 : "" };
+    *cando = sub { ($_[0] & $_[2]->mode) ? 1 : "" };
 }
 else {