updated the post-commit hook to include the commit message in the notification email

This commit is contained in:
hyung-hwan 2015-08-28 02:06:26 +00:00
parent 986812edd5
commit 3abd8c62bb

View File

@ -168,6 +168,28 @@ sub get_author
return $author;
}
sub get_commit_message
{
my $pool = SVN::Pool->new(undef);
my $svn = eval { SVN::Repos::open ($REPOFS, $pool) };
if (!defined($svn))
{
print (STDERR "Cannot open svn - $REPOFS\n");
return undef;
}
my $fs = $svn->fs ();
if (!defined($fs))
{
print (STDERR "Cannot open fs - $REPOFS\n");
return undef;
}
my $author = $fs->revision_prop ($REV, 'svn:log');
return $author;
}
sub format_string
{
my ($fmt, $userid, $password) = @_;
@ -399,9 +421,16 @@ if (lc($cfg->{commit_notification}) eq 'yes')
}
else
{
$commit_message = 'See ' . format_commit_url($cfg->{commit_notification_url}, $REPOBASE, $AUTHOR, $REV);
$commit_message = format_commit_url($cfg->{commit_notification_url}, $REPOBASE, $AUTHOR, $REV);
}
my $m = get_commit_message ();
if (defined($m))
{
$commit_message = $commit_message . "\n" . $m;
}
email_message_to_project_members ($cfg, $dbh, $cfg->{database_prefix}, $REPOBASE, $commit_subject, $commit_message);
}