From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 21 Aug 2003 15:06:16 +0000 (+0000)
Subject: No more public cwd(), use private _cwd().
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=14fb0816f82645feea09be96f0558a9eca72698e;p=p5sagit%2Fp5-mst-13.2.git

No more public cwd(), use private _cwd().

p4raw-id: //depot/perl@20801
---

diff --git a/lib/File/Spec/t/Spec.t b/lib/File/Spec/t/Spec.t
index f3e49f0..eb6a719 100644
--- a/lib/File/Spec/t/Spec.t
+++ b/lib/File/Spec/t/Spec.t
@@ -214,7 +214,7 @@ if ($^O eq 'MacOS') {
 [ "Win32->canonpath('/a/b/c/../../d')", '\\a\\d'              ],
 [ "Win32->canonpath('/a/b/c/.../d')",   '\\a\\d'              ],
 [ "Win32->canonpath('\\../temp\\')",    '\\temp'              ],
-[ "Win32->can('cwd')",                  qr/CODE/              ],
+[ "Win32->can('_cwd')",                 qr/CODE/              ],
 
 # FakeWin32 subclass (see below) just sets CWD to C:\one\two
 
@@ -540,7 +540,7 @@ plan tests => scalar @tests;
 
 {
     @File::Spec::FakeWin32::ISA = qw(File::Spec::Win32);
-    sub File::Spec::FakeWin32::cwd { 'C:\\one\\two' }
+    sub File::Spec::FakeWin32::_cwd { 'C:\\one\\two' }
 }