* Only include predecessors that are themselves being pushed.
Otherwise the substitute mechanism can break in subtle ways.
This commit is contained in:
		
							parent
							
								
									00fe1a506f
								
							
						
					
					
						commit
						1ad9d11247
					
				
					 1 changed files with 6 additions and 1 deletions
				
			
		| 
						 | 
				
			
			@ -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;
 | 
			
		||||
    }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue