tests: adjust perl -I to use $top_srcdir/tests, not $srcdir/..

39 files changed, 39 insertions, 39 deletions

diff --git a/tests/dd/skip-seek b/tests/dd/skip-seek
index 80795d871..2bedd3027 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 583311685..dc626d244 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 2784a3c09..318f26d7a 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 1d400b3fd..fb4f64083 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 003b3635a..fd3c1770c 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 0c0ddaa77..ec43bb7b9 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 8b5734ba5..e235ec3a1 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 52bd97032..057da6f4c 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 0354112a1..31969bfeb 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 9674bc4c5..f7968fdcd 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 a27034fd0..320ef2f67 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 5487d2117..b10c6c018 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 bd4d29ddc..4f9be9a59 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 a171e4ffb..ad7c7bf40 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 ed42fb60b..c54c7a553 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 829f0ac10..b1430994b 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 af555d60c..b2c6116cd 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 6ce9ba11c..826165633 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 9763e098a..46eb1a89d 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 9b50a511d..21f1e47f6 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 d189ddde5..33fbc0020 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 64c33f2a5..05ad9286f 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 56a549ed3..ae8137359 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 db0b3ad99..541aaf216 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 decac8f9f..e94dec176 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 bacf6ec59..798e8a325 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 180241480..728302e37 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 021ad8138..9a62d6743 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 b4224f71b..8963acb98 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 6615df5d1..9852e1fea 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 f36621406..59ac53560 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 9bdd95057..8ef7f3f5e 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 dd593abdf..1bd3b90b8 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 de3ec87ee..c8992ef13 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 d70bb7d56..3698a5679 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 cb8503543..c3a34077a 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 24726fedb..d52366683 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 85cf1ed4d..96dab94c0 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 836cd611a..fe5665344 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;