| … | … | ||
|---|---|---|---|
| 529 | if (@$stack == 0 | 529 | if (@$stack == 0 |
| 530 | or not ($stack->[-1]) | 530 | or not ($stack->[-1]) |
| 531 | or $stack->[-1]->{_name} ne $arch->{_name}) | 531 | or $stack->[-1]->{_name} ne $arch->{_name}) |
| 532 | { | 532 | { |
| 533 | push @$stack, $arch; | 533 | push @$stack, $arch; |
| 534 | |||
| 535 | } elsif ($stack->[-1]->{_name} eq $arch->{_name}) { | ||
| 536 | $stack->[-1] = $arch; | ||
| 534 | } | 537 | } |
| 535 | } | 538 | } |
| 536 | } | 539 | } |
| 537 | } | 540 | } |
| 538 | 541 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |