Make the generated regexps not too general!

git-svn-id: svn://10.0.0.236/trunk@9276 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
terry%netscape.com
1998-09-03 23:57:21 +00:00
parent b36957e25d
commit c9939d1fd3

View File

@@ -172,6 +172,7 @@ while (@reprow = $repquery->fetchrow()) {
$regexp =~ s/\./\\./g;
$regexp =~ s:\*$:.*:;
$regexp =~ s:\%$:[^/]*:;
$regexp = '^' . $regexp . '$';
print COMMITCHECK "if (m:$regexp:) {return '$partid';}\n";
}
}