aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-03-23 13:32:29 +0000
committerChristopher Baines <mail@cbaines.net>2024-03-23 13:32:29 +0000
commita865c013ddc5ab7a20dfef75cb3a776ea9ccfe16 (patch)
treeab03bed74d929ef31ed32bfbccba5942761ba79d
parent2bbdcbc147417539fa8dd57e06da1b51dfab13dd (diff)
downloadnar-herder-a865c013ddc5ab7a20dfef75cb3a776ea9ccfe16.tar
nar-herder-a865c013ddc5ab7a20dfef75cb3a776ea9ccfe16.tar.gz
Close the nar-port rather than the output-port
As we've finished reading from the nar-port, but the output-port represents the HTTP connection, and is still used.
-rw-r--r--nar-herder/server.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/nar-herder/server.scm b/nar-herder/server.scm
index 50db5a8..ff3f131 100644
--- a/nar-herder/server.scm
+++ b/nar-herder/server.scm
@@ -446,7 +446,7 @@
output-port
bytes)
- (close-port output-port))))))
+ (close-port nar-port))))))
(values (build-response #:code 404)
(if (eq? (request-method request) 'HEAD)