From 684246432c854ffab436304470545f1da46eae07 Mon Sep 17 00:00:00 2001
From: "bbaetz%student.usyd.edu.au" <>
Date: Thu, 15 Aug 2002 06:30:40 +0000
Subject: Bug 151619 - Problem with the regex in checksetup.pl to find
 dependancies r=jouni, joel

---
 checksetup.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'checksetup.pl')

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
         }
-- 
cgit v1.2.3-24-g4f1b