From a0715632f16ac6302e27b24060dee8f257992d04 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 23 May 2007 00:50:18 -0700 Subject: [PATCH] only use the body, not attachments, in Estraier --- Debbugs/Estraier.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Debbugs/Estraier.pm b/Debbugs/Estraier.pm index a079a20c..f2f6cb8e 100644 --- a/Debbugs/Estraier.pm +++ b/Debbugs/Estraier.pm @@ -29,6 +29,7 @@ use Search::Estraier; use Date::Manip; use Debbugs::Common qw(getbuglocation getbugcomponent); use Debbugs::Status qw(readbug); +use Debbugs::MIME qw(parse); BEGIN{ ($VERSION) = q$Revision: 1.3 $ =~ /^Revision:\s+([^\s+])/; @@ -112,7 +113,9 @@ sub add_bug_message{ my $uri = "$bug_num/$msg_num"; $doc = $est->get_doc_by_uri($uri); $doc = new Search::Estraier::Document if not defined $doc; - $doc->add_text($bug_message); + + my $message = parse($bug_message); + $doc->add_text(join('',values %{$message})); # * @id : the ID number determined automatically when the document is registered. # * @uri : the location of a document which any document should have. -- 2.39.5