From 70a82454b40303c4626ebd6bda6d2269ea3080d7 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Sat, 9 Aug 2008 07:11:56 -0700 Subject: [PATCH] * switch to bug_links from bug_url --- Debbugs/CGI/Bugreport.pm | 19 ++++++++++++++----- 1 file changed, 14 insertions(+), 5 deletions(-) diff --git a/Debbugs/CGI/Bugreport.pm b/Debbugs/CGI/Bugreport.pm index f2f26bd..faed9be 100644 --- a/Debbugs/CGI/Bugreport.pm +++ b/Debbugs/CGI/Bugreport.pm @@ -171,12 +171,16 @@ sub display_entity { return; } elsif (not exists $param{att}) { - my @dlargs = ($ref, msg=>$xmessage, att=>$#$attachments); + my @dlargs = (msg=>$xmessage, att=>$#$attachments); push @dlargs, (filename=>$filename) if $filename ne ''; my $printname = $filename; $printname = 'Message part ' . ($#$attachments + 1) if $filename eq ''; - print {$param{output}} '
[$printname } .
-		  "($type, $disposition)]
\n"; + print {$param{output}} '
[$printname } .
+				  "($type, $disposition)]
\n"; } } @@ -373,8 +377,13 @@ sub handle_record{ my ($received,$hostname) = $record->{text} =~ m/Received: \(at (\S+)\) by (\S+)\;/; $output .= qq|

Message #$msg_number received at |. html_escape("$received\@$hostname") . - q| (full text'. - q|, mbox)'.":

\n"; + q| (full text'. + q|, mbox)'.":

\n"; $output .= handle_email_message($record->{text}, ref => $bug_number, msg_num => $msg_number, -- 2.39.2