# now we need to investigate the branch this generates the
# laundered version but we don't switch to it yet
my $old_head = get_head();
- my ($old_laundered_tip,$old_bw,$old_upstream_update) = walk $old_head;
+ my ($old_laundered_tip,$old_bw,$old_anchor) = walk $old_head;
my $old_bw_cl = classify $old_bw;
- my $old_upstream_update_cl = classify $old_upstream_update;
- confess unless $old_upstream_update_cl->{OrigParents};
+ my $old_anchor_cl = classify $old_anchor;
+ confess unless $old_anchor_cl->{OrigParents};
my $old_upstream = parsecommit
- $old_upstream_update_cl->{OrigParents}[0]{CommitId};
+ $old_anchor_cl->{OrigParents}[0]{CommitId};
$piece->('', Old => $old_upstream->{CommitId});