From: bbaetz%student.usyd.edu.au <>
Date: Thu, 15 Aug 2002 06:32:04 +0000 (+0000)
Subject: Bug 151619 - Problem with the regex in checksetup.pl to find dependancies
X-Git-Tag: bugzilla-2.16.1~8
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ff5a5b7d5a56a9b75d71162663e6673f93fca3c6;p=thirdparty%2Fbugzilla.git

Bug 151619 - Problem with the regex in checksetup.pl to find dependancies
r=jouni, joel
---

diff --git a/checksetup.pl b/checksetup.pl
index 8c5b7ea1ff..4d3c1e1587 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -2722,7 +2722,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
         }