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.
This commit is contained in:
parent
cfe19684ea
commit
f85dbc4f3b
|
@ -837,8 +837,8 @@ REPORTER, which should be a <progress-reporter> object."
|
||||||
(make-custom-binary-input-port "progress-port-proc"
|
(make-custom-binary-input-port "progress-port-proc"
|
||||||
read! #f #f
|
read! #f #f
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(close-connection port)
|
(stop)
|
||||||
(stop)))))))
|
(close-port port)))))))
|
||||||
|
|
||||||
(define-syntax with-networking
|
(define-syntax with-networking
|
||||||
(syntax-rules ()
|
(syntax-rules ()
|
||||||
|
|
Loading…
Reference in New Issue