http: avoid uninitialized variable

[public-inbox.git] / lib / PublicInbox / HTTP.pm

diff --git a/lib/PublicInbox/HTTP.pm b/lib/PublicInbox/HTTP.pm
index 77b178c07e6fea56cfe47c9b95a7358499f91088..104a2132ba6108b92b9a5764d46a2b820234a7ee 100644 (file)
--- a/lib/PublicInbox/HTTP.pm
+++ b/lib/PublicInbox/HTTP.pm
@@ -190,6 +190,7 @@ sub response_header_write {
                $alive = 1;
                $h .= "Connection: keep-alive\r\n";
        } else {
+               $alive = 0;
                $h .= "Connection: close\r\n";
        }
        $h .= 'Date: ' . http_date() . "\r\n\r\n";