diff options
Diffstat (limited to 'tests/md5sum')
| -rwxr-xr-x | tests/md5sum/basic-1 | 3 | ||||
| -rwxr-xr-x | tests/md5sum/newline-1 | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/tests/md5sum/basic-1 b/tests/md5sum/basic-1 index 7def710d7..7b56e64f7 100755 --- a/tests/md5sum/basic-1 +++ b/tests/md5sum/basic-1 @@ -25,7 +25,8 @@ $PERL -e 1 > /dev/null 2>&1 || { exit 77 } -exec $PERL -w -I$srcdir/.. -MCoreutils -- - <<\EOF +me=`echo $0|sed 's,.*/,,'` +exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; diff --git a/tests/md5sum/newline-1 b/tests/md5sum/newline-1 index 787121b0d..5e16b9c90 100755 --- a/tests/md5sum/newline-1 +++ b/tests/md5sum/newline-1 @@ -41,7 +41,8 @@ if test $filename_may_contain_newline = no; then exit 77 fi -exec $PERL -w -I$srcdir/.. -MCoreutils -- - <<\EOF +me=`echo $0|sed 's,.*/,,'` +exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF require 5.003; use strict; |