Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26384/lib/Module/Build
Modified Files:
Tag: release-0_26_branch
Compat.pm
Log Message:
Windows does not support the concept of tilde-expansion, nor does it support the getpw* routines, so we skip the tilde expansion code and tests related to it.
Index: Compat.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Compat.pm,v
retrieving revision 1.57.2.1
retrieving revision 1.57.2.2
diff -C2 -d -r1.57.2.1 -r1.57.2.2
*** Compat.pm 29 Dec 2004 02:54:36 -0000 1.57.2.1
--- Compat.pm 6 Jan 2005 04:08:44 -0000 1.57.2.2
***************
*** 137,141 ****
# Do tilde-expansion like MakeMaker does, more or less
! $val =~ s{^~(\w*)} { (getpwnam($1 || (getpwuid $>)[0]))[7] || "~$1" }e;
if (exists $makefile_to_build{$key}) {
--- 137,143 ----
# Do tilde-expansion like MakeMaker does, more or less
! unless ( Module::Build->os_type eq 'Windows' ) {
! $val =~ s{^~(\w*)} { (getpwnam($1 || (getpwuid $>)[0]))[7] || "~$1" }e;
! }
if (exists $makefile_to_build{$key}) {
|
