my @rets;
foreach my $ci (git_commit_info('HEAD', $num)) {
- my $title = join("\n", @{$ci->{'comment'}});
-
# Skip redundant commits.
- next if ($title eq $dummy_commit_msg);
+ next if (@{$ci->{'comment'}}[0] eq $dummy_commit_msg);
my ($sha1, $when) = (
$ci->{'sha1'},
diffurl => $diffurl,
};
}
- push @messages, { line => $title };
+ push @messages, { line => $_ } foreach @{$ci->{'comment'}};
my ($user, $type) = (q{}, "web");