From bffedc430003f94a06510e55bc4aacd759cbb85f Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Sat, 14 Jul 2007 19:27:10 -0700
Subject: [PATCH]   - Add anchor links to specific messages (closes: #431450)

---
 cgi/bugreport.cgi | 6 ++++--
 debian/changelog  | 1 +
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/cgi/bugreport.cgi b/cgi/bugreport.cgi
index 64547d4..5b46729 100755
--- a/cgi/bugreport.cgi
+++ b/cgi/bugreport.cgi
@@ -475,8 +475,10 @@ sub handle_record{
 	  }
 	  # Incomming Mail Message
 	  my ($received,$hostname) = $record->{text} =~ m/Received: \(at (\S+)\) by (\S+)\;/;
-	  $output .= qq|<hr><p class="msgreceived"><a name="$msg_number"></a><a name="msg$msg_number">Message received</a> at |.
-	       html_escape("$received\@$hostname") . q| (<a href="| . bug_url($ref, msg=>$msg_number) . '">full text</a>'.q|, <a href="| . bug_url($ref, msg=>$msg_number,mbox=>'yes') .'">mbox</a>)'.":</p>\n";
+	  $output .= qq|<hr><p class="msgreceived"><a name="$msg_number"></a><a name="msg$msg_number"></a><a href="#$msg_number">Message</a> received at |.
+	       html_escape("$received\@$hostname") .
+		    q| (<a href="| . bug_url($ref, msg=>$msg_number) . '">full text</a>'.
+			 q|, <a href="| . bug_url($ref, msg=>$msg_number,mbox=>'yes') .'">mbox</a>)'.":</p>\n";
 	  $output .= handle_email_message($record->{text},
 				    ref        => $bug_number,
 				    msg_number => $msg_number,
diff --git a/debian/changelog b/debian/changelog
index 42889f0..fb62a5e 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -196,6 +196,7 @@ debbugs (2.4.2) UNRELEASED; urgency=low
     - Allow selecting both archived and unarchived bugs (closes: #320175)
     - Support intersecting sets of bugs (closes: #164421)
     - Allow selecting the newest N bugs (closes: #84681)
+    - Add anchor links to specific messages (closes: #431450)
 
   
  -- Colin Watson <cjwatson@debian.org>  Fri, 20 Jun 2003 18:57:25 +0100
-- 
2.39.2