From: Perl 5 Porters <perl5-porters.nicoh.com>
Date: Tue, 2 Jan 1996 03:28:57 +0000 (+0000)
Subject: VMS patches.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e7ae011613ab9e1683332421cf9ea7b4c5e94c94;p=p5sagit%2Fp5-mst-13.2.git

VMS patches.
---

diff --git a/lib/Cwd.pm b/lib/Cwd.pm
index a627354..bc206db 100644
--- a/lib/Cwd.pm
+++ b/lib/Cwd.pm
@@ -49,7 +49,7 @@ kept up to date it all packages which use chdir import it from Cwd.
 =cut
 
 @ISA = qw(Exporter);
-@EXPORT = qw(cwd getcwd fastcwd);
+@EXPORT = qw(cwd getcwd fastcwd fastgetcwd);
 @EXPORT_OK = qw(chdir);
 
 # use strict;
@@ -251,6 +251,7 @@ if ($osname eq 'VMS') {
 
     *cwd        = \&_vms_pwd;
     *getcwd     = \&_vms_pwd;
+    *fastcwd    = \&_vms_cwd;
     *fastgetcwd = \&_vms_cwd;
 }
 elsif ($osname eq 'NT') {