diff options
author | Jim Meyering <meyering@redhat.com> | 2011-04-28 11:12:01 +0200 |
---|---|---|
committer | Jim Meyering <meyering@redhat.com> | 2011-04-28 22:43:56 +0200 |
commit | 156084826533bf149db7dfd2b9466ab116b4ca4b (patch) | |
tree | 058d552d9d98129eadcb8cf830551e647a13c689 /tests/check.mk | |
parent | e3f814a773cf683309271b866d69dbfa968b104a (diff) | |
download | coreutils-156084826533bf149db7dfd2b9466ab116b4ca4b.tar.xz |
tests: write skip explanation from perl scripts also to outer stderr
* tests/CuSkip.pm (skip): New file/module/function, to help
the perl test scripts "skip" a test consistently, emitting
a diagnostic both into the log file and into the outermost
stderr stream that is more likely to be seen by a human.
* tests/check.mk (TESTS_ENVIRONMENT): Add -MCuSkip.
* tests/misc/date-next-dow: Use CuSkip::skip in place of warn+exit-77.
* tests/misc/tty-eof: Likewise.
* tests/misc/uniq: Likewise.
* tests/rm/fail-eperm: Likewise.
* tests/misc/md5sum-newline: Likewise. Also, s/program_name/ME/.
* tests/misc/ls-misc (setuid_setup, main): Likewise.
* tests/misc/pwd-long: Likewise, and add -I"$abs_srcdir" -MCuSkip
to the $PERL invocation command.
Inspired by a request from Bruno Haible regarding misc/tty-eof:
http://debbugs.gnu.org/8570
Diffstat (limited to 'tests/check.mk')
-rw-r--r-- | tests/check.mk | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/check.mk b/tests/check.mk index 1e3ca8502..db7f06773 100644 --- a/tests/check.mk +++ b/tests/check.mk @@ -63,7 +63,7 @@ TESTS_ENVIRONMENT = \ if grep '^\#!/usr/bin/perl' "$$1" > /dev/null; then \ if $(PERL) -e 'use warnings' > /dev/null 2>&1; then \ grep '^\#!/usr/bin/perl -T' "$$1" > /dev/null && T_=T || T_=; \ - $(PERL) -w$$T_ -I$(srcdir) -MCoreutils \ + $(PERL) -w$$T_ -I$(srcdir) -MCoreutils -MCuSkip \ -M"CuTmpdir qw($$f)" -- "$$1"; \ else \ echo 1>&2 "$$tst: configure did not find a usable version of Perl," \ |