aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-06-01 11:31:21 +0100
committerChristopher Baines <mail@cbaines.net>2024-06-01 11:49:25 +0100
commit2b8e87602bb3a43089b2303378c864da6533799d (patch)
tree46a3489d3e93aa44e9a0bd1cf5ecbfff939650c0
parent9094fdb4e18c34088340433a2b51b1f4ab3403f6 (diff)
downloadnar-herder-2b8e87602bb3a43089b2303378c864da6533799d.tar
nar-herder-2b8e87602bb3a43089b2303378c864da6533799d.tar.gz
Don't strip the Via header
-rw-r--r--nar-herder/server.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/nar-herder/server.scm b/nar-herder/server.scm
index 7046784..720fcf1 100644
--- a/nar-herder/server.scm
+++ b/nar-herder/server.scm
@@ -404,7 +404,12 @@
. ,(string-append
"/internal/nar/"
compression "/"
- (uri-encode filename)))))
+ (uri-encode filename)))
+ ,@(let ((via (request-via request)))
+ (if (null? via)
+ '()
+ `((Via
+ . ,(string-join via ", ")))))))
#f)))
(let ((cached-narinfo-file
(and narinfo ; must be a known hash