Subject: | fix cygwin t/2-pp.t |
See attached patch
t/2-pp.t: do not use GetShortPathName on cygwin, only for Win32 paths
2005-12-27 14:35:43 rurban@cpan.org
* t/2-pp.t: do not use GetShortPathName on cygwin,
only for Win32 paths
--- PAR-0.90/t/2-pp.t.orig 2005-09-22 16:06:01.000000000 +0200
+++ PAR-0.90/t/2-pp.t 2005-12-27 14:12:46.146250000 +0100
@@ -50,7 +50,7 @@
exit;
}
-if (defined &Win32::GetShortPathName) {
+if (defined &Win32::GetShortPathName and $^X =~ m/^[a-z]:/i) {
$^X = lc(Win32::GetShortPathName($^X));
$startperl = lc(Win32::GetShortPathName($startperl));
}