From: Jerry D. Hedden <jdhedden@cpan.org>
Date: Wed, 27 Jun 2007 20:46:39 +0000 (-0400)
Subject: Re: [PATCH-revised] ext/Win32/t/Unicode.t failures on FAT32 under Cygwin
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=52cc710768675452226d280165d6b448662d5d4b;p=p5sagit%2Fp5-mst-13.2.git

Re: [PATCH-revised] ext/Win32/t/Unicode.t failures on FAT32 under Cygwin
From: "Jerry D. Hedden" <jdhedden@cpan.org>
Message-ID: <1ff86f510706271746r62f921f4s3770df0b92cdf201@mail.gmail.com>

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

diff --git a/ext/Win32/t/Unicode.t b/ext/Win32/t/Unicode.t
index b01057b..0de9463 100644
--- a/ext/Win32/t/Unicode.t
+++ b/ext/Win32/t/Unicode.t
@@ -8,7 +8,7 @@ BEGIN {
 	print "1..0 # Skip: Needs ActivePerl 820 or Perl 5.8.9 or later\n";
 	exit 0;
     }
-    unless ((Win32::FsType())[1] & 4) {
+    if ((((Win32::FsType())[1] & 4) == 0) || (Win32::FsType() =~ /^FAT/)) {
 	print "1..0 # Skip: Filesystem doesn't support Unicode\n";
 	exit 0;
     }