Subject: | T1/t/t10type1.t failure on MS Windows |
Hi,
please consider applying the enclosed patch that fixes the following failure related to upper/lower case drive letters on MS Windows:
t/t10type1.t .. 53/97
Show quoted text
Show quoted text
Failed 2/97 subtests
Funny is that this failure does not fail always (even on the same computer) .
Tested on perl-5.14.0RC1, MS Windows 64bit, gcc-4.4.6 compiler
--
kmx
please consider applying the enclosed patch that fixes the following failure related to upper/lower case drive letters on MS Windows:
t/t10type1.t .. 53/97
Show quoted text
# Failed test 'found font by absolute path'
# at t/t10type1.t line 357.
# at t/t10type1.t line 357.
Show quoted text
# Failed test 'found font by drive relative path'
# at t/t10type1.t line 367.
# Looks like you failed 2 tests of 97.
t/t10type1.t .. Dubious, test returned 2 (wstat 512, 0x200)# at t/t10type1.t line 367.
# Looks like you failed 2 tests of 97.
Failed 2/97 subtests
Funny is that this failure does not fail always (even on the same computer) .
Tested on perl-5.14.0RC1, MS Windows 64bit, gcc-4.4.6 compiler
--
kmx
Subject: | Imager-0.82.diff |
diff -ru Imager-0.82\T1\T1.pm Imager-0.82i\T1\T1.pm
--- Imager-0.82\T1\T1.pm Thu Feb 17 11:52:01 2011
+++ Imager-0.82i\T1\T1.pm Wed May 04 22:40:19 2011
@@ -54,7 +54,7 @@
# we want to avoid T1Lib's file search mechanism
unless ($hsh{file} =~ m!^/!
|| $hsh{file} =~ m!^\.\/?/!
- || $^O =~ /^(MSWin32|cygwin)$/ && $hsh{file} =~ /^[a-z]:/) {
+ || $^O =~ /^(MSWin32|cygwin)$/ && $hsh{file} =~ /^[a-z]:/i) {
$hsh{file} = './' . $hsh{file};
}
@@ -65,7 +65,7 @@
}
unless ($hsh{afm} =~ m!^/!
|| $hsh{afm} =~ m!^\./!
- || $^O =~ /^(MSWin32|cygwin)$/ && $hsh{file} =~ /^[a-z]:/) {
+ || $^O =~ /^(MSWin32|cygwin)$/ && $hsh{file} =~ /^[a-z]:/i) {
$hsh{file} = './' . $hsh{file};
}
} else {