Oops, I might've left it out, somewhere.
---
t/check-www-inbox.perl | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl
index 7dd1eeb..6232f16 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) = ('', '');
--
EW
--
unsubscribe: [email protected]
archive: https://public-inbox.org/meta/
