This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: And now the Cwd problem (was Re: chdir.t problem...)
[perl5.git] / lib / Cwd.pm
index 01f5ce4..9602919 100644 (file)
@@ -443,7 +443,6 @@ sub _os2_cwd {
 
 sub _win32_cwd {
     $ENV{'PWD'} = Win32::GetCwd();
 
 sub _win32_cwd {
     $ENV{'PWD'} = Win32::GetCwd();
-    $ENV{'PWD'} =~ s:\\:/:g ;
     return $ENV{'PWD'};
 }
 
     return $ENV{'PWD'};
 }