From ac9c1dc7bdf1a016fcd1989993999e4a32d0c885 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 8 Mar 2017 23:10:09 +0100 Subject: list-runtime-roots: Bufferize the lsof pipe. * nix/scripts/list-runtime-roots.in (lsof-roots): Add 'setvbuf' call for PIPE. --- nix/scripts/list-runtime-roots.in | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'nix') diff --git a/nix/scripts/list-runtime-roots.in b/nix/scripts/list-runtime-roots.in index 993eb169c1..a6938087b5 100644 --- a/nix/scripts/list-runtime-roots.in +++ b/nix/scripts/list-runtime-roots.in @@ -1,7 +1,7 @@ #!@GUILE@ -ds !# ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2012, 2013, 2014 Ludovic Courtès +;;; Copyright © 2012, 2013, 2014, 2017 Ludovic Courtès ;;; ;;; 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) -- cgit v1.2.3