Fix ext/Win32/t/Unicode.t test failure under Cygwin

From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <1ff86f510709061007x57e86b50led110861846cdc02@mail.gmail.com>

p4raw-id: //depot/perl@31808

diff --git a/ext/Win32/t/Unicode.t b/ext/Win32/t/Unicode.t
index f88ace3..382b13a 100644 (file)
--- a/ext/Win32/t/Unicode.t
+++ b/ext/Win32/t/Unicode.t
@@ -75,8 +75,7 @@ ok(Win32::GetLongPathName($w32dir), $long);
 # cwd() on Cygwin returns a mapped path that we need to translate
 # back to a Windows path. Invoking `cygpath` on $subdir doesn't work.
 if ($^O eq "cygwin") {
-    chomp(my $cygpath = `cygpath -w "$cwd"`);
-    $subdir =~ s,\Q$cwd\E,$cygpath,;
+    $subdir = Cygwin::posix_to_win_path($subdir, 1);
 }
 $subdir =~ s,/,\\,g;
 ok(Win32::GetLongPathName($subdir), $long);