diff options
| author | Eelco Dolstra <e.dolstra@tudelft.nl> | 2006-08-01 13:50:10 +0000 |
|---|---|---|
| committer | Eelco Dolstra <e.dolstra@tudelft.nl> | 2006-08-01 13:50:10 +0000 |
| commit | a29b64a231468174dcc693979fe40bd482b040b4 (patch) | |
| tree | da3144cbc6433bc411c8020e5bb683306c562939 | |
| parent | 4fde308ec047df9691bbfb6f6c1b1fd8d56e8404 (diff) | |
| download | guix-a29b64a231468174dcc693979fe40bd482b040b4.tar.gz | |
* Better error checking.
| -rw-r--r-- | scripts/nix-build.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/nix-build.in b/scripts/nix-build.in index fab8fae84e..1357b7a129 100644 --- a/scripts/nix-build.in +++ b/scripts/nix-build.in @@ -110,9 +110,9 @@ foreach my $expr (@exprs) { # Instantiate. my @drvPaths; - open DRVPATHS, "-|", "@bindir@/nix-instantiate", "--add-root", $drvLink, "--indirect", @instArgs, $expr; + my $pid = open DRVPATHS, "-|", "@bindir@/nix-instantiate", "--add-root", $drvLink, "--indirect", @instArgs, $expr; while (<DRVPATHS>) {chomp; push @drvPaths, $_;} - close DRVPATHS; + close DRVPATHS or die; foreach my $drvPath (@drvPaths) { my $target = readlink $drvPath; |