diff options
Diffstat (limited to 'x2p/find2perl.SH')
| -rwxr-xr-x | x2p/find2perl.SH | 22 |
1 files changed, 12 insertions, 10 deletions
diff --git a/x2p/find2perl.SH b/x2p/find2perl.SH index 8670173db6..8ab7f9c394 100755 --- a/x2p/find2perl.SH +++ b/x2p/find2perl.SH @@ -1,20 +1,22 @@ case $CONFIG in '') - if test ! -f config.sh; then - ln ../config.sh . || \ - ln ../../config.sh . || \ - ln ../../../config.sh . || \ - (echo "Can't find config.sh."; exit 1) - fi - . ./config.sh - ;; + if test -f config.sh; then TOP=.; + elif test -f ../config.sh; then TOP=..; + elif test -f ../../config.sh; then TOP=../..; + elif test -f ../../../config.sh; then TOP=../../..; + elif test -f ../../../../config.sh; then TOP=../../../..; + else + echo "Can't find config.sh."; exit 1 + fi + . $TOP/config.sh + ;; esac : This forces SH files to create target in same directory as SH file. : This is so that make depend always knows where to find SH derivatives. case "$0" in */*) cd `expr X$0 : 'X\(.*\)/'` ;; esac -echo "Extracting find2perl (with variable substitutions)" +echo "Extracting x2p/find2perl (with variable substitutions)" : This section of the file will have variable substitutions done on it. : Move anything that needs config subs from !NO!SUBS! section to !GROK!THIS!. : Protect any dollar signs and backticks that you do not want interpreted @@ -169,7 +171,7 @@ while (@ARGV) { $out .= &tab . '($prune = 1)'; } elsif ($_ eq 'xdev') { - $out .= &tab . '(($prune |= ($dev != $topdev)),1)'; + $out .= &tab . '!($prune |= ($dev != $topdev))'; } elsif ($_ eq 'newer') { $out .= &tab; |