05/09: packages: Output and error ports are line-buffered in ‘patch-and-repack’.

[guix-commits]

civodul pushed a commit to branch core-updates
in repository guix.

commit 8d88ef1ac72a36010f23e4e3a158c44f4eb50132
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Dec 11 17:59:44 2023 +0100

    packages: Output and error ports are line-buffered in ‘patch-and-repack’.
    
    * guix/packages.scm (patch-and-repack): Add ‘setvbuf’ calls.
    
    Change-Id: I039bb6407263d5172bf0bc716bda6860dc2615fb
---
 guix/packages.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/guix/packages.scm b/guix/packages.scm
index 4b0c478ff4..cb8db925f8 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -1007,6 +1007,11 @@ specifies modules in scope when evaluating SNIPPET."
                          '("--no-recursion"
                            "--files-from=.file_list"))))
 
+            (let ((line (cond-expand (guile-2.0 _IOLBF)
+                                     (else 'line))))
+              (setvbuf (current-output-port) line)
+              (setvbuf (current-error-port) line))
+
             ;; Encoding/decoding errors shouldn't be silent.
             (fluid-set! %default-port-conversion-strategy 'error)