hg-download: Make (guix swh) output visible.
* guix/hg-download.scm (hg-fetch)[build]: Add 'setvbuf' calls.
This commit is contained in:
parent
69d7333217
commit
0b535f7b8b
@ -104,6 +104,9 @@ HASH-ALGO (a symbol). Use NAME as the file name, or a generic name if #f."
|
|||||||
(((names dirs outputs ...) ...)
|
(((names dirs outputs ...) ...)
|
||||||
dirs)))
|
dirs)))
|
||||||
|
|
||||||
|
(setvbuf (current-output-port) 'line)
|
||||||
|
(setvbuf (current-error-port) 'line)
|
||||||
|
|
||||||
(or (hg-fetch '#$(hg-reference-url ref)
|
(or (hg-fetch '#$(hg-reference-url ref)
|
||||||
'#$(hg-reference-changeset ref)
|
'#$(hg-reference-changeset ref)
|
||||||
#$output
|
#$output
|
||||||
|
Loading…
Reference in New Issue
Block a user