t/check-www-inbox.perl | 4 +++-

diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl
index 7dd1eebeb00a268d7e141e136566db97b1151942..6232f1647bcc9174a9e0d5a9ee7603c6e5840688 100644
--- a/t/check-www-inbox.perl
+++ b/t/check-www-inbox.perl
@@ -156,7 +156,9 @@
 		# 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) = ('', '');