termux-packages/packages/perl/Cwd.pm.patch

16 lines
557 B
Diff

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