lib/PublicInbox/GitHTTPBackend.pm | 4 ++-- diff --git a/lib/PublicInbox/GitHTTPBackend.pm b/lib/PublicInbox/GitHTTPBackend.pm index 6e8ad955d7af9a7deb112366e178e6811b2f4d8c..8e6d8b648985445e93d215b5c8faf0525f2fb41a 100644 --- a/lib/PublicInbox/GitHTTPBackend.pm +++ b/lib/PublicInbox/GitHTTPBackend.pm @@ -201,11 +201,11 @@ return $end->() if $r == 0; # EOF if ($fh) { # stream body from git-http-backend to HTTP client $fh->write($buf); $buf = ''; - } elsif ($buf =~ s/\A(.*?)\r?\n\r?\n//s) { # parse headers + } elsif ($buf =~ s/\A(.*?)\r\n\r\n//s) { # parse headers my $h = $1; my $code = 200; my @h; - foreach my $l (split(/\r?\n/, $h)) { + foreach my $l (split(/\r\n/, $h)) { my ($k, $v) = split(/:\s*/, $l, 2); if ($k =~ /\AStatus\z/i) { $code = int($v);