From: Eric Wong <e@80x24.org>
Date: Sun, 1 May 2016 22:18:35 +0000 (+0000)
Subject: git-http-backend: use real lseek for Content-Range
X-Git-Tag: v1.0.0~566
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=526a1e027cacf0c49092ae90b9b5d02c9d381705;p=public-inbox.git

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")
---

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";