Bug 151619 - Problem with the regex in checksetup.pl to find dependancies

r=jouni, joel


git-svn-id: svn://10.0.0.236/trunk@127297 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
bbaetz%student.usyd.edu.au 2002-08-14 23:32:04 +00:00
parent 5d1bcea3f4
commit 1f5b944420

View File

@ -2782,7 +2782,8 @@ if (!($sth->fetchrow_arrayref()->[0])) {
foreach $key (keys(%dupes))
{
$dupes{$key} =~ s/.*\*\*\* This bug has been marked as a duplicate of (\d{1,5}) \*\*\*.*?/$1/sm;
$dupes{$key} =~ /^.*\*\*\* This bug has been marked as a duplicate of (\d+) \*\*\*$/ms;
$dupes{$key} = $1;
$dbh->do("INSERT INTO duplicates VALUES('$dupes{$key}', '$key')");
# BugItsADupeOf Dupe
}