summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorJerry D. Hedden <jdhedden@cpan.org>2007-06-27 16:46:39 -0400
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-06-28 06:13:31 +0000
commit52cc710768675452226d280165d6b448662d5d4b (patch)
treeb0bafa1e5257f4a72ebbab5b6be576d6f0e0ca8d /ext
parent36ec1dfebf170dd9e8ba96cebf1fae69464caac4 (diff)
downloadperl-52cc710768675452226d280165d6b448662d5d4b.tar.gz
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
Diffstat (limited to 'ext')
-rw-r--r--ext/Win32/t/Unicode.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Win32/t/Unicode.t b/ext/Win32/t/Unicode.t
index b01057b5ab..0de94637ca 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;
}