strengthened commit message check
This commit is contained in:
parent
97afd1191c
commit
d033a7af79
@ -122,11 +122,18 @@ sub check_commit_message
|
||||
|
||||
my $log = $txn->prop ('svn:log');
|
||||
$log =~ s/^\s+|\s+$//g; # trim leading spaces and trailing spaces
|
||||
if (length($log) < $minlen) {
|
||||
if (length($log) < $minlen)
|
||||
{
|
||||
print (STDERR "Commit message too short. must be >= $minlen\n");
|
||||
return 0;
|
||||
}
|
||||
|
||||
if ($log =~ /^[[:punct:][:space:]]+$/)
|
||||
{
|
||||
print (STDERR "Commit message meaningless\n");
|
||||
return 0;
|
||||
}
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user