commit | 66d485c115bcb37d7d88a774b69dca99f53beadb | [log] [tgz] |
---|---|---|
author | Sergey Kandaurov <pluknet@nginx.com> | Sat Dec 28 19:22:28 2019 +0300 |
committer | Sergey Kandaurov <pluknet@nginx.com> | Sat Dec 28 19:22:28 2019 +0300 |
tree | 25140c11c5afcb2be8c3289465c1ad13bbb918d6 | |
parent | eba71cb211e3e55bae6f0e7f96f783b76519cafa [diff] |
Tests: unbreak dav tests on Perl < 5.12.
diff --git a/dav.t b/dav.t index 7083236..f01624a 100644 --- a/dav.t +++ b/dav.t
@@ -119,6 +119,9 @@ like($r, qr/201 Created.*(Content-Length|\x0d\0a0\x0d\x0a)/ms, 'mkcol'); +SKIP: { +skip 'perl too old', 1 if !$^V or $^V lt v5.12.0; + TODO: { local $TODO = 'not yet' unless $t->has_version('1.17.7'); @@ -126,6 +129,8 @@ } +} + $r = http(<<EOF); COPY /test/ HTTP/1.1 Host: localhost