MacOS patches from Paul J. Schinder.

1 files changed, 4 insertions, 0 deletions

diff --git a/t/old-base.t b/t/old-base.t
index 6afb970..a0c7cbb 100644
--- a/t/old-base.t
+++ b/t/old-base.t
@@ -26,6 +26,7 @@ package main;
 
 # Must ensure that there is no relative paths in @INC because we will
 # chdir in the newlocal tests.
+unless ($^O eq "MacOS") {
 chomp($pwd = ($^O =~ /mswin32/i ? `cd` : `pwd`));
 for (@INC) {
     next if m|^/| or $^O =~ /os2|mswin32/i and m|^\w:[\\/]|;
@@ -33,6 +34,7 @@ for (@INC) {
     $_ = "$pwd/$_";
 
 }
+}
 
 $| = 1;
 
@@ -628,6 +630,8 @@ $url->path($all);
 #
 
 sub newlocal_test {
+    return 1 if $^O eq "MacOS";
+    
     print "newlocal_test:\n";
     my $pwd = ($^O eq 'MSWin32' ? 'cd' : (-e '/bin/pwd' ? '/bin/pwd' : 'pwd'));
     my $tmpdir = ($^O eq 'MSWin32' ? $ENV{TEMP} : '/tmp');