list-runtime-roots: Bufferize the lsof pipe. * nix/scripts/list-runtime-roots.in (lsof-roots): Add 'setvbuf' call for PIPE.
1 files changed, 4 insertions(+), 1 deletions(-) M nix/scripts/list-runtime-roots.in
M nix/scripts/list-runtime-roots.in => nix/scripts/list-runtime-roots.in +4 -1
@@ 1,7 1,7 @@ #!@GUILE@ -ds !# ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013, 2014 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2012, 2013, 2014, 2017 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ 133,6 133,9 @@ or the empty list." (define %file-rx (make-regexp "^n/(.*)$")) ;; We're going to read it all. (setvbuf pipe _IOFBF 16384) (let loop ((line (read-line pipe)) (roots '())) (cond ((eof-object? line)