update-copyright test: Improve output when perl is missing or too old.

* tests/test-update-copyright.sh: Move test of Perl version down after
the test whether Perl exists. Provide an explanation relating Perl's
error message to Automake's SKIP: message.

diff --git a/ChangeLog b/ChangeLog
index 8eb739206188413edd43b24e7d14b4705d31090c..e82e39f6ae82426c42fc78c94783a4277025e2d8 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2010-09-04  Bruno Haible  <bruno@clisp.org>
+
+       update-copyright test: Improve output when perl is missing or too old.
+       * tests/test-update-copyright.sh: Move test of Perl version down after
+       the test whether Perl exists. Provide an explanation relating Perl's
+       error message to Automake's SKIP: message.
+
 2010-09-04  Bruno Haible  <bruno@clisp.org>
 
        Don't augment PATH in TESTS_ENVIRONMENT.

diff --git a/tests/test-update-copyright.sh b/tests/test-update-copyright.sh
index 971f651f93aed48af3cedf221a6ea450948a722f..fbf4f23bb4f4a7339b52a6dc1e1a25ebb1c09b5f 100755 (executable)
--- a/tests/test-update-copyright.sh
+++ b/tests/test-update-copyright.sh
@@ -16,10 +16,6 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-# Skip this test if Perl is too old.  FIXME: 5.8.0 is just a guess.
-# We have a report that 5.6.1 is inadequate and that 5.8.0 works.
-perl -e 'require 5.8.0' || exit 77
-
 diffout=`diff -u /dev/null /dev/null 2>&1`
 if test x"$diffout" = x"" && test $? -eq 0; then
   compare() { diff -u "$@"; }
@@ -54,6 +50,13 @@ echo a > $TMP-in
     exit 77
   }
 
+# Skip this test if Perl is too old.  FIXME: 5.8.0 is just a guess.
+# We have a report that 5.6.1 is inadequate and that 5.8.0 works.
+perl -e 'require 5.8.0' || {
+  echo '$0: skipping this test; Perl version is too old' 1>&2
+  exit 77
+}
+
 # Do not let a different envvar setting perturb results.
 UPDATE_COPYRIGHT_MAX_LINE_LENGTH=72
 export UPDATE_COPYRIGHT_MAX_LINE_LENGTH