X-Git-Url: https://git.distorted.org.uk/~mdw/termux-packages/blobdiff_plain/aba4a7e08d822a386045e0a27491cb50b529f986..4266f6b764b0c3787ded35e026ee3205ae7ee6f9:/packages/perl/Cwd.pm.patch

diff --git a/packages/perl/Cwd.pm.patch b/packages/perl/Cwd.pm.patch
index 7373efc7..333feeb1 100644
--- a/packages/perl/Cwd.pm.patch
+++ b/packages/perl/Cwd.pm.patch
@@ -1,7 +1,7 @@
 diff -u -r ../perl-5.22.0/dist/PathTools/Cwd.pm ./dist/PathTools/Cwd.pm
---- ../perl-5.22.0/dist/PathTools/Cwd.pm	2015-05-13 16:19:29.000000000 -0400
-+++ ./dist/PathTools/Cwd.pm	2015-08-30 13:34:33.445269291 -0400
-@@ -168,9 +168,8 @@
+--- ../perl-5.24.1/dist/PathTools/Cwd.pm	2016-07-25 09:12:20.000000000 +0000
++++ ./dist/PathTools/Cwd.pm	2017-02-28 20:36:10.314765294 +0000
+@@ -179,9 +179,8 @@
  # so everything works under taint mode.
  my $pwd_cmd;
  if($^O ne 'MSWin32') {
@@ -13,3 +13,12 @@ diff -u -r ../perl-5.22.0/dist/PathTools/Cwd.pm ./dist/PathTools/Cwd.pm
  		    ) {
  	if( -x $try ) {
  	    $pwd_cmd = $try;
+@@ -198,7 +197,7 @@
+ if ($^O =~ /android/) {
+     # If targetsh is executable, then we're either a full
+     # perl, or a miniperl for a native build.
+-    if (-x $Config::Config{targetsh}) {
++    if (defined($Config::Config{targetsh}) && -x $Config::Config{targetsh}) {
+         $pwd_cmd = "$Config::Config{targetsh} -c pwd"
+     }
+     else {