From 69822fef73720cb201bf9cb7f25ed5ea2c4fa10a Mon Sep 17 00:00:00 2001
From: Eric Wong <e@80x24.org>
Date: Mon, 21 Jan 2019 03:09:22 +0000
Subject: t/check-www-inbox: warn on missing Content-Type

Oops, I might've left it out, somewhere.
---
 t/check-www-inbox.perl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 't/check-www-inbox.perl')

diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl
index 7dd1eebe..6232f164 100644
--- a/t/check-www-inbox.perl
+++ b/t/check-www-inbox.perl
@@ -156,7 +156,9 @@ sub worker_loop {
 		# make sure the HTML source doesn't screw up terminals
 		# when people curl the source (not remotely an expert
 		# on languages or encodings, here).
-		my $ct = $r->header('Content-Type');
+		my $ct = $r->header('Content-Type') || '';
+		warn "no Content-Type: $u\n" if $ct eq '';
+
 		if ($atom_check && $ct =~ m!\bapplication/atom\+xml\b!) {
 			my $raw = $r->decoded_content;
 			my ($out, $err) = ('', '');
-- 
cgit v1.2.3-24-ge0c7