Tests: added Host header test with control character.
diff --git a/http_host.t b/http_host.t
index 8b9f6ad..989a9fe 100644
--- a/http_host.t
+++ b/http_host.t
@@ -22,7 +22,7 @@
select STDERR; $| = 1;
select STDOUT; $| = 1;
-my $t = Test::Nginx->new()->has(qw/http rewrite/)->plan(36);
+my $t = Test::Nginx->new()->has(qw/http rewrite/)->plan(37);
$t->write_file_expand('nginx.conf', <<'EOF');
@@ -171,6 +171,13 @@
like(http_host_header("localhost\nHost: again", 1), qr/ 400 /, 'host repeat');
+TODO: {
+local $TODO = 'not yet' unless $t->has_version('1.21.1');
+
+like(http_host_header("localhost\x02", 1), qr/ 400 /, 'control');
+
+}
+
###############################################################################
sub http_host_header {