* 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>) {
 | 
					        while (<PREDS>) {
 | 
				
			||||||
            chomp;
 | 
					            chomp;
 | 
				
			||||||
            die unless (/^\//);
 | 
					            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;
 | 
					        close PREDS;
 | 
				
			||||||
    }
 | 
					    }
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue