From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 27 Dec 2003 17:50:34 +0000 (+0000)
Subject: Assimilate File::Spec 0.87
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4fdb5a70f63a1d6604e29575f02327446e68127f;p=p5sagit%2Fp5-mst-13.2.git

Assimilate File::Spec 0.87

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

diff --git a/lib/File/Spec.pm b/lib/File/Spec.pm
index a0f5752..b5f56d0 100644
--- a/lib/File/Spec.pm
+++ b/lib/File/Spec.pm
@@ -3,7 +3,7 @@ package File::Spec;
 use strict;
 use vars qw(@ISA $VERSION);
 
-$VERSION = '0.86';
+$VERSION = '0.87';
 
 my %module = (MacOS   => 'Mac',
 	      MSWin32 => 'Win32',
diff --git a/lib/File/Spec/t/Spec.t b/lib/File/Spec/t/Spec.t
index 182daf1..1c2dd6a 100644
--- a/lib/File/Spec/t/Spec.t
+++ b/lib/File/Spec/t/Spec.t
@@ -224,7 +224,7 @@ if ($^O eq 'MacOS') {
 [ "Win32->canonpath('\\..\\')",         '\\'                  ],
 [ "Win32->canonpath('/../')",           '\\'                  ],
 [ "Win32->canonpath('/..\\')",          '\\'                  ],
-[ "Win32->can('_cwd')",                 qr/CODE/              ],
+[ "Win32->can('_cwd')",                 '/CODE/'              ],
 
 # FakeWin32 subclass (see below) just sets CWD to C:\one\two