From 526a1e027cacf0c49092ae90b9b5d02c9d381705 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 1 May 2016 22:18:35 +0000 Subject: git-http-backend: use real lseek for Content-Range Since we use sysread, we must use sysseek for symmetry although PerlIO may be doing a real lseek with "seek", anyways. Fixes: 310819ea86ac ("git-http-backend: favor sysread for regular files") --- lib/PublicInbox/GitHTTPBackend.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/PublicInbox/GitHTTPBackend.pm b/lib/PublicInbox/GitHTTPBackend.pm index 4b396934..937b2e9a 100644 --- a/lib/PublicInbox/GitHTTPBackend.pm +++ b/lib/PublicInbox/GitHTTPBackend.pm @@ -130,7 +130,7 @@ sub prepare_range { if ($len <= 0) { $code = 416; } else { - seek($in, $beg, SEEK_SET) or return [ 500, [], [] ]; + sysseek($in, $beg, SEEK_SET) or return [ 500, [], [] ]; push @$h, qw(Accept-Ranges bytes Content-Range); push @$h, "bytes $beg-$end/$size"; -- cgit v1.2.3-24-ge0c7