Fix up the HTTP::Tiny upgrade

I mistakenly thought I saw corpus/ being missing from Perl, so IGNORED it
in Maintainers.pl, but actually the problem was simply that one file was
missing (it's new) -- so add it now.

diff --git a/MANIFEST b/MANIFEST
index 82efabc..12d3dfb 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -1232,6 +1232,7 @@ cpan/HTTP-Tiny/corpus/redirect-06.txt
 cpan/HTTP-Tiny/corpus/redirect-07.txt
 cpan/HTTP-Tiny/corpus/redirect-08.txt
 cpan/HTTP-Tiny/corpus/redirect-09.txt
+cpan/HTTP-Tiny/corpus/redirect-10.txt
 cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
 cpan/HTTP-Tiny/t/000_load.t
 cpan/HTTP-Tiny/t/001_api.t

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 00bcd5f..af1438a 100755 (executable)
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -619,7 +619,6 @@ use File::Glob qw(:case);
             't/200_live.t',
             't/200_live_local_ip.t',
             't/210_live_ssl.t',
-            qr/^corpus/,
             qr/^eg/,
             qr/^xt/
         ],

diff --git a/cpan/HTTP-Tiny/corpus/redirect-10.txt b/cpan/HTTP-Tiny/corpus/redirect-10.txt
new file mode 100644 (file)
index 0000000..3abe585
--- /dev/null
+++ b/cpan/HTTP-Tiny/corpus/redirect-10.txt
@@ -0,0 +1,35 @@
+url
+  http://example.com/index.html
+expected
+  abcdefghijklmnopqrstuvwxyz1234567890abcdef
+expected_url
+  http://example.com/index2.html
+----------
+GET /index.html HTTP/1.1
+Host: example.com
+Connection: close
+User-Agent: HTTP-Tiny/VERSION
+
+----------
+HTTP/1.1 308 Permanent Redirect
+Date: Thu, 03 Feb 1994 00:00:00 GMT
+Content-Type: text/html
+Content-Length: 53
+Location: http://example.com/index2.html
+
+<a href="http://example.com/index2.html">redirect</a>
+
+----------
+GET /index2.html HTTP/1.1
+Host: example.com
+Connection: close
+User-Agent: HTTP-Tiny/VERSION
+
+----------
+HTTP/1.1 200 OK
+Date: Thu, 03 Feb 1994 00:00:00 GMT
+Content-Type: text/plain
+Content-Length: 42
+
+abcdefghijklmnopqrstuvwxyz1234567890abcdef
+