Initial push
[termux-packages] / packages / perl / Cwd.pm.patch
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 ) {