about summary refs log tree commit homepage
diff options
context:
space:
mode:
-rw-r--r--lib/PublicInbox/WWW.pm2
-rw-r--r--t/httpd.t5
2 files changed, 6 insertions, 1 deletions
diff --git a/lib/PublicInbox/WWW.pm b/lib/PublicInbox/WWW.pm
index efe7c8ca..3ce7cc2a 100644
--- a/lib/PublicInbox/WWW.pm
+++ b/lib/PublicInbox/WWW.pm
@@ -70,7 +70,7 @@ sub call {
                         return invalid_inbox($ctx, $1) || mbox_results($ctx);
                 }
         }
-        elsif ($method !~ /\AGET|HEAD\z/) {
+        elsif ($method !~ /\A(?:GET|HEAD)\z/) {
                 return r(405);
         }
 
diff --git a/t/httpd.t b/t/httpd.t
index 2972afb2..c9756a70 100644
--- a/t/httpd.t
+++ b/t/httpd.t
@@ -49,6 +49,11 @@ EOF
         $td = start_script($cmd, undef, { 3 => $sock });
         my $host = $sock->sockhost;
         my $port = $sock->sockport;
+        {
+                my $bad = tcp_connect($sock);
+                print $bad "GETT / HTTP/1.0\r\n\r\n" or die;
+                like(<$bad>, qr!\AHTTP/1\.[01] 405\b!, 'got 405 on bad req');
+        }
         my $conn = tcp_connect($sock);
         ok($conn, 'connected');
         ok($conn->write("GET / HTTP/1.0\r\n\r\n"), 'wrote data to socket');