1 files changed, 0 insertions, 44 deletions
diff --git a/debian/vendor-h2o/misc/p5-net-fastcgi/t/020_protocol/005_record_length.t b/debian/vendor-h2o/misc/p5-net-fastcgi/t/020_protocol/005_record_length.t
deleted file mode 100644
index 1d23819..0000000
--- a/debian/vendor-h2o/misc/p5-net-fastcgi/t/020_protocol/005_record_length.t
+++ /dev/null
@@ -1,44 +0,0 @@
-#!perl
-
-use strict;
-use warnings;
-
-use lib 't/lib', 'lib';
-use myconfig;
-
-use Test::More tests => 18;
-use Test::Exception;
-
-BEGIN {
-    use_ok('Net::FastCGI::Constant', qw[:all]);
-    use_ok('Net::FastCGI::Protocol', qw[ build_header
-                                         build_record
-                                         get_record_length ]);
-}
-
-
-is get_record_length(undef), 0, 'get_record_length(undef)';
-
-{
-    for my $len (0..7) {
-        is get_record_length("\x00" x $len), 0, qq<get_record_length("\\x00" x $len)>;
-    }
-}
-
-{
-    for my $len (8, 16, 32, 64) {
-        my $record = build_record(0, 0, "\x00" x $len);
-        is get_record_length($record), FCGI_HEADER_LEN + $len;
-    }
-}
-
-{
-    my $header = build_header(0, 0, 8192, 250);
-    is get_record_length($header), FCGI_HEADER_LEN + 8192 + 250;
-}
-
-# get_record_length(octets)
-for (0, 2) {
-    throws_ok { get_record_length((1) x $_) } qr/^Usage: /;
-}
-