substitute: Use the same port for multiple request batches.

In http-multiple-get.

* guix/scripts/substitute.scm (http-multiple-get): Switch port to p in one
occurrence.
This commit is contained in:
Christopher Baines 2020-03-02 20:13:39 +00:00
parent 910bf1f7a1
commit 121191f23a
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577

View file

@ -538,7 +538,7 @@ initial connection on which HTTP requests are sent."
(() (()
(reverse result)) (reverse result))
(remainder (remainder
(connect port remainder result)))) (connect p remainder result))))
((head tail ...) ((head tail ...)
(let* ((resp (read-response p)) (let* ((resp (read-response p))
(body (response-body-port resp)) (body (response-body-port resp))