mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-11 13:49:23 -05:00
store: Add another missing buffer flush.
This is a followup to 3809824199
.
* guix/store.scm (add-file-tree-to-store): Add 'write-buffered-output'
call.
This commit is contained in:
parent
32b3611375
commit
000bbe02e2
1 changed files with 1 additions and 0 deletions
|
@ -1044,6 +1044,7 @@ (define cache
|
|||
#:file-port file-port
|
||||
#:symlink-target symlink-target
|
||||
#:directory-entries directory-entries)
|
||||
(write-buffered-output server)
|
||||
(let loop ((done? (process-stderr server)))
|
||||
(or done? (loop (process-stderr server))))
|
||||
(let ((result (read-store-path port)))
|
||||
|
|
Loading…
Reference in a new issue