diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-03-09 16:35:41 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-03-09 16:35:41 +0100 |
commit | e90e0fad1b3ba79d81f02424e143ee6f4f736e8b (patch) | |
tree | 2c26190fd9114199b0ef79303e18a61100cab4af /nix/scripts/list-runtime-roots.in | |
parent | 8ea0700d231a8819fc7e8332e9685f0ce15c174e (diff) | |
parent | 9ec2a4d3fec44f08a55df9f5f3d1a04b83e7fcf6 (diff) | |
download | patches-e90e0fad1b3ba79d81f02424e143ee6f4f736e8b.tar patches-e90e0fad1b3ba79d81f02424e143ee6f4f736e8b.tar.gz |
Merge branch 'master' into core-updates
Diffstat (limited to 'nix/scripts/list-runtime-roots.in')
-rw-r--r-- | nix/scripts/list-runtime-roots.in | 5 |
1 files changed, 4 insertions, 1 deletions
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 <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) |