# $dgitimport->("unclean-$tagsfx", $msg)
# is callled for each situation or commit that
# wouldn't be found in a laundered branch
- # $furniture is forfurniture commits such as might be found on an
+ # $furniture is for furniture commits such as might be found on an
# interchange branch (pseudomerge, d/patches, changelog)
# $trouble is for things whnich prevent the return of
# anchor and breakwater information; if that is ignored,
fresh_workarea();
my $new_head = make_commit [ $old_head, $ffq_prev ], [
'Declare fast forward / record previous work',
- "[git-debrebase pseudomerge: stitch$prose]",
+ "[git-debrebase pseudomerge: $prose]",
];
push @deferred_updates, "update $gdrlast $new_head $git_null_obj";
- update_head $old_head, $new_head, "stitch";
+ update_head $old_head, $new_head, "stitch: $prose";
}
sub cmd_new_upstream_v0 () {
}
sub cmd_stitch () {
- my $prose = '';
+ my $prose = 'stitch';
GetOptions('prose=s', \$prose) or die badusage("bad options to stitch");
badusage "no arguments allowed" if @ARGV;