diff options
Diffstat (limited to 'checksetup.pl')
-rwxr-xr-x | checksetup.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/checksetup.pl b/checksetup.pl index 7c6b7d399..4cf164f09 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -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 } |