From: Sven Verdoolaege <skimo@kotnet.org>
Date: Fri, 22 Jun 2007 15:49:08 +0000 (+0200)
Subject: t9500: skip gitweb tests if perl version is too old
X-Git-Tag: v1.5.3-rc0~64
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=fc746df6476078fa04f821aea00f84bbe13dbf9f;p=git

t9500: skip gitweb tests if perl version is too old

gitweb calls Encode::decode_utf8 with two arguments,
but old versions of perl only allow this function to be called
with one argument.  Even older versions of perl do not even
have an Encode module.

Signed-off-by: Sven Verdoolaege <skimo@kotnet.org>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
---

diff --git a/t/t9500-gitweb-standalone-no-errors.sh b/t/t9500-gitweb-standalone-no-errors.sh
index 44ae503b99..d948724566 100755
--- a/t/t9500-gitweb-standalone-no-errors.sh
+++ b/t/t9500-gitweb-standalone-no-errors.sh
@@ -60,6 +60,12 @@ gitweb_run () {
 
 . ./test-lib.sh
 
+perl -MEncode -e 'decode_utf8("", Encode::FB_CROAK)' >/dev/null 2>&1 || {
+    test_expect_success 'skipping gitweb tests, perl version is too old' :
+    test_done
+    exit
+}
+
 gitweb_init
 
 # ----------------------------------------------------------------------