[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/05: substitute: Progress port really closes underlying port.
From: |
Ludovic Courtès |
Subject: |
02/05: substitute: Progress port really closes underlying port. |
Date: |
Tue, 25 Sep 2018 10:05:12 -0400 (EDT) |
civodul pushed a commit to branch wip-ui
in repository guix.
commit 5778b41a97716a01f2376e61d8a42fe13515c1be
Author: Ludovic Courtès <address@hidden>
Date: Tue Sep 25 12:28:55 2018 +0200
substitute: Progress port really closes underlying port.
* guix/scripts/substitute.scm (progress-report-port): Use 'close-port'
instead of 'close-connection'. Move 'stop' call first.
---
guix/scripts/substitute.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/guix/scripts/substitute.scm b/guix/scripts/substitute.scm
index 6d31dfd..50c6a22 100755
--- a/guix/scripts/substitute.scm
+++ b/guix/scripts/substitute.scm
@@ -837,8 +837,8 @@ REPORTER, which should be a <progress-reporter> object."
(make-custom-binary-input-port "progress-port-proc"
read! #f #f
(lambda ()
- (close-connection port)
- (stop)))))))
+ (stop)
+ (close-port port)))))))
(define-syntax with-networking
(syntax-rules ()