TakeV
/
guix
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* Only include predecessors that are themselves being pushed. 

Otherwise the substitute mechanism can break in subtle ways.
This commit is contained in:
Eelco Dolstra 2004-02-13 10:43:31 +00:00
parent 00fe1a506f
commit 1ad9d11247
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
scripts/nix-push.in
View File

@ -139,7 +139,12 @@ for (my $n = 0; $n < scalar @storepaths; $n++) {
while (<PREDS>) {
chomp;
die unless (/^\//);
print MANIFEST " SuccOf: $_\n";
my $pred = $_;
# Only include predecessors that are themselves being
# pushed.
if (defined $storepaths{$pred}) {
print MANIFEST " SuccOf: $pred\n";
}
}
close PREDS;
}