| 1 | diff -u -r ../perl-5.20.2/dist/PathTools/Cwd.pm ./dist/PathTools/Cwd.pm |
| 2 | --- ../perl-5.20.2/dist/PathTools/Cwd.pm 2015-01-10 07:06:37.000000000 -0500 |
| 3 | +++ ./dist/PathTools/Cwd.pm 2015-05-17 19:40:53.224454256 -0400 |
| 4 | @@ -333,9 +333,8 @@ |
| 5 | # are safe. This prevents _backtick_pwd() consulting $ENV{PATH} |
| 6 | # so everything works under taint mode. |
| 7 | my $pwd_cmd; |
| 8 | -foreach my $try ('/bin/pwd', |
| 9 | - '/usr/bin/pwd', |
| 10 | - '/QOpenSys/bin/pwd', # OS/400 PASE. |
| 11 | +foreach my $try ('@TERMUX_PREFIX@/bin/pwd', |
| 12 | + '@TERMUX_PREFIX@/bin/applets/pwd' |
| 13 | ) { |
| 14 | |
| 15 | if( -x $try ) { |