substitute: Close port at the end of http-multiple-get.

* guix/scripts/substitute.scm (http-multiple-get): Add close-port call.
2020-03-02 20:20:40 +00:00 · 2020-03-02 20:20:40 +00:00 · 928dc1bb1c
parent d5abb3049e
commit 928dc1bb1c
1 changed files with 1 additions and 0 deletions
--- a/guix/scripts/substitute.scm
+++ b/guix/scripts/substitute.scm
@ -537,6 +537,7 @@ initial connection on which HTTP requests are sent."
          (()
           (match (drop requests processed)
             (()
+              (close-port p)
              (reverse result))
             (remainder
              (connect p remainder result))))