From 4595b85d3dabc3043c35934be94367c70aa17008 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 5 Jul 2006 17:37:24 -0700 Subject: [PATCH] * link to blocking bugs in bugreport.cgi --- cgi/bugreport.cgi | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/cgi/bugreport.cgi b/cgi/bugreport.cgi index 64e367a..f61ad08 100755 --- a/cgi/bugreport.cgi +++ b/cgi/bugreport.cgi @@ -404,6 +404,10 @@ sub handle_record{ $output =~ s{(Bug )(\d+)( cloned as bugs? )(\d+)(?:\-(\d+)|)}{$1.bug_links($2).$3.bug_links($4,$5)}eo; # Add links to merged bugs $output =~ s{(?<=Merged )([\d\s]+)(?=\.)}{join(' ',map {bug_links($_)} (split /\s+/, $1))}eo; + # Add links to blocked bugs + $output =~ s{(?<=Blocking bugs)(?:(of )(\d+))?( (?:added|set to|removed):\s+)([\d\s]+)} + {(defined $2?$1.bug_links($2):'').$3. + join(' ',map {bug_links($_)} (split /\s+/, $4))}eo; # Add links to reassigned packages $output =~ s{(Bug reassigned from package \`)([^\']+)(' to \`)([^\']+)(')} {$1.q($2).$3.q($4).$5}eo; -- 2.39.2