From: Jim Meyering Date: Fri, 18 Apr 2008 14:51:34 +0000 (+0200) Subject: tests: adjust perl -I to use $top_srcdir/tests, not $srcdir/.. X-Git-Tag: v6.12~106 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=c51900a6bd655e7dd596fa6888a0e521e6b5a6bd;p=platform%2Fupstream%2Fcoreutils.git tests: adjust perl -I to use $top_srcdir/tests, not $srcdir/.. --- diff --git a/tests/dd/skip-seek b/tests/dd/skip-seek index 80795d8..2bedd30 100755 --- a/tests/dd/skip-seek +++ b/tests/dd/skip-seek @@ -24,7 +24,7 @@ SCRIPT_NAME=$0 export SCRIPT_NAME me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/du/files0-from b/tests/du/files0-from index 5833116..dc626d2 100755 --- a/tests/du/files0-from +++ b/tests/du/files0-from @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/base64 b/tests/misc/base64 index 2784a3c..318f26d 100755 --- a/tests/misc/base64 +++ b/tests/misc/base64 @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/basename b/tests/misc/basename index 1d400b3..fb4f640 100755 --- a/tests/misc/basename +++ b/tests/misc/basename @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; use File::stat; diff --git a/tests/misc/cut b/tests/misc/cut index 003b363..fd3c177 100755 --- a/tests/misc/cut +++ b/tests/misc/cut @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/date b/tests/misc/date index 0c0ddaa..ec43bb7 100755 --- a/tests/misc/date +++ b/tests/misc/date @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/dircolors b/tests/misc/dircolors index 8b5734b..e235ec3 100755 --- a/tests/misc/dircolors +++ b/tests/misc/dircolors @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/dirname b/tests/misc/dirname index 52bd970..057da6f 100755 --- a/tests/misc/dirname +++ b/tests/misc/dirname @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; use File::stat; diff --git a/tests/misc/expand b/tests/misc/expand index 0354112..31969bf 100755 --- a/tests/misc/expand +++ b/tests/misc/expand @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/expr b/tests/misc/expr index 9674bc4..f7968fd 100755 --- a/tests/misc/expr +++ b/tests/misc/expr @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/factor b/tests/misc/factor index a27034f..320ef2f 100755 --- a/tests/misc/factor +++ b/tests/misc/factor @@ -22,7 +22,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/fmt b/tests/misc/fmt index 5487d21..b10c6c0 100755 --- a/tests/misc/fmt +++ b/tests/misc/fmt @@ -28,7 +28,7 @@ LC_ALL=C export LC_ALL me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/fold b/tests/misc/fold index bd4d29d..4f9be9a 100755 --- a/tests/misc/fold +++ b/tests/misc/fold @@ -34,7 +34,7 @@ case $ver in esac me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/head-elide-tail b/tests/misc/head-elide-tail index a171e4f..ad7c7bf 100755 --- a/tests/misc/head-elide-tail +++ b/tests/misc/head-elide-tail @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/ls-misc b/tests/misc/ls-misc index ed42fb6..c54c7a5 100755 --- a/tests/misc/ls-misc +++ b/tests/misc/ls-misc @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/md5sum b/tests/misc/md5sum index 829f0ac..b143099 100755 --- a/tests/misc/md5sum +++ b/tests/misc/md5sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/md5sum-newline b/tests/misc/md5sum-newline index af555d6..b2c6116 100755 --- a/tests/misc/md5sum-newline +++ b/tests/misc/md5sum-newline @@ -34,7 +34,7 @@ if test $filename_may_contain_newline = no; then fi me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/mktemp b/tests/misc/mktemp index 6ce9ba1..8261656 100755 --- a/tests/misc/mktemp +++ b/tests/misc/mktemp @@ -22,7 +22,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/od b/tests/misc/od index 9763e09..46eb1a8 100755 --- a/tests/misc/od +++ b/tests/misc/od @@ -22,7 +22,7 @@ me=`echo $0|sed 's,.*/,,'` me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/paste b/tests/misc/paste index 9b50a51..21f1e47 100755 --- a/tests/misc/paste +++ b/tests/misc/paste @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/pr b/tests/misc/pr index d189ddd..33fbc00 100755 --- a/tests/misc/pr +++ b/tests/misc/pr @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/seq b/tests/misc/seq index 64c33f2..05ad928 100755 --- a/tests/misc/seq +++ b/tests/misc/seq @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha1sum b/tests/misc/sha1sum index 56a549e..ae81373 100755 --- a/tests/misc/sha1sum +++ b/tests/misc/sha1sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha1sum-vec b/tests/misc/sha1sum-vec index db0b3ad..541aaf2 100755 --- a/tests/misc/sha1sum-vec +++ b/tests/misc/sha1sum-vec @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha224sum b/tests/misc/sha224sum index decac8f..e94dec1 100755 --- a/tests/misc/sha224sum +++ b/tests/misc/sha224sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha256sum b/tests/misc/sha256sum index bacf6ec..798e8a3 100755 --- a/tests/misc/sha256sum +++ b/tests/misc/sha256sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha384sum b/tests/misc/sha384sum index 1802414..728302e 100755 --- a/tests/misc/sha384sum +++ b/tests/misc/sha384sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sha512sum b/tests/misc/sha512sum index 021ad81..9a62d67 100755 --- a/tests/misc/sha512sum +++ b/tests/misc/sha512sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sort-merge b/tests/misc/sort-merge index b4224f7..8963acb 100755 --- a/tests/misc/sort-merge +++ b/tests/misc/sort-merge @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/stat-printf b/tests/misc/stat-printf index 6615df5..9852e1f 100755 --- a/tests/misc/stat-printf +++ b/tests/misc/stat-printf @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/sum b/tests/misc/sum index f366214..59ac535 100755 --- a/tests/misc/sum +++ b/tests/misc/sum @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/test-diag b/tests/misc/test-diag index 9bdd950..8ef7f3f 100755 --- a/tests/misc/test-diag +++ b/tests/misc/test-diag @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/tsort b/tests/misc/tsort index dd593ab..1bd3b90 100755 --- a/tests/misc/tsort +++ b/tests/misc/tsort @@ -21,7 +21,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/unexpand b/tests/misc/unexpand index de3ec87..c8992ef 100755 --- a/tests/misc/unexpand +++ b/tests/misc/unexpand @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/misc/wc-files0-from b/tests/misc/wc-files0-from index d70bb7d..3698a56 100755 --- a/tests/misc/wc-files0-from +++ b/tests/misc/wc-files0-from @@ -22,7 +22,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF #/ require 5.003; use strict; diff --git a/tests/misc/xstrtol b/tests/misc/xstrtol index cb85035..c3a3407 100755 --- a/tests/misc/xstrtol +++ b/tests/misc/xstrtol @@ -25,7 +25,7 @@ fi . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/mv/i-1 b/tests/mv/i-1 index 24726fe..d523666 100755 --- a/tests/mv/i-1 +++ b/tests/mv/i-1 @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/rm/empty-name b/tests/rm/empty-name index 85cf1ed..96dab94 100755 --- a/tests/rm/empty-name +++ b/tests/rm/empty-name @@ -25,7 +25,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/rm/unreadable b/tests/rm/unreadable index 836cd61..fe56653 100755 --- a/tests/rm/unreadable +++ b/tests/rm/unreadable @@ -20,7 +20,7 @@ . $top_srcdir/tests/require-perl me=`echo $0|sed 's,.*/,,'` -exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - << \EOF +exec $PERL -w -I$top_srcdir/tests -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict;