No more public cwd(), use private _cwd().
Jarkko Hietaniemi [Thu, 21 Aug 2003 15:06:16 +0000 (15:06 +0000)]
p4raw-id: //depot/perl@20801

lib/File/Spec/t/Spec.t

index f3e49f0..eb6a719 100644 (file)
@@ -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' }
 }