my $cdata = git_cat_file $walk, 'commit';
my ($hdrs,$msg) = $cdata =~ m{\n\n} ? ($`,$') : ($cdata,'');
if ($msg =~ m{^\[git-debrebase\ (
- anchor | pseudomerge | changelog |
- make-patches | merged-breakwater
+ anchor | changelog | make-patches |
+ merged-breakwater | pseudomerge
) [: ] }mx) {
# no need to analyse this - it's sufficient
# (gdr classifications: Anchor, MergedBreakwaters)