From c7ef08d9721d38f6e6c19aa9dfcd1a6a2492d8d0 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Thu, 18 Sep 2008 17:22:24 -0700 Subject: [PATCH] fix link to cloned bugs --- Debbugs/CGI/Bugreport.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Debbugs/CGI/Bugreport.pm b/Debbugs/CGI/Bugreport.pm index 24913e3..a01c2de 100644 --- a/Debbugs/CGI/Bugreport.pm +++ b/Debbugs/CGI/Bugreport.pm @@ -320,7 +320,7 @@ sub handle_record{ # (even though these links already exist at the top) $output =~ s,((?:ftp|http|https)://[\S~-]+?/?)([\)\'\:\.\,]?(?:\s|\.<|$)),$1$2,go; # Add links to the cloned bugs - $output =~ s{(Bug )(\d+)( cloned as bugs? )(\d+)(?:\-(\d+)|)}{$1.bug_links(bug=>$2).$3.bug_links(bug=>[$4..$5])}eo; + $output =~ s{(Bug )(\d+)( cloned as bugs? )(\d+)(?:\-(\d+)|)}{$1.bug_links(bug=>$2).$3.bug_links(bug=>(defined $5)?[$4..$5]:$4)}eo; # Add links to merged bugs $output =~ s{(?<=Merged )([\d\s]+)(?=\.)}{join(' ',map {bug_links(bug=>$_)} (split /\s+/, $1))}eo; # Add links to blocked bugs -- 2.39.2