Don't use getcwd in non-copy builds.

diff --git a/util/mk1mf.pl b/util/mk1mf.pl
index 94691df98a1a03b3503962704ad13971ba67826a..90ae84b2f6ec436dc7daa8a7c9844ed5a4007825 100755 (executable)
--- a/util/mk1mf.pl
+++ b/util/mk1mf.pl
@@ -192,7 +192,7 @@ $mkdir="-mkdir" unless defined $mkdir;
 $ranlib="echo ranlib";
 
 $cc=(defined($VARS{'CC'}))?$VARS{'CC'}:'cc';
-$src_dir=(defined($VARS{'SRC'}))?$VARS{'SRC'}:getcwd();
+$src_dir=(defined($VARS{'SRC'}))?$VARS{'SRC'}: $platform eq 'copy' ? getcwd() : '.';
 $bin_dir=(defined($VARS{'BIN'}))?$VARS{'BIN'}:'';
 
 # $bin_dir.=$o causes a core dump on my sparc :-(