strip the first "Fwd" from subject. add case insensitivity to removing "re" from subject

git-svn-id: svn://10.0.0.236/trunk@56700 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
endico%mozilla.org 2000-01-04 00:42:57 +00:00
parent 3823830445
commit 2bc5bb1690

View File

@ -125,7 +125,8 @@ for my $msg (sort { $a <=> $b } $folder->message_list) {
my $from = $1;
$news =~ /^Subject: ([^\n]+)/m;
my $subject = $1;
$subject =~ s/^Re://g;
$subject =~ s/^Re://ig;
$subject =~ s/^Fwd://ig;
$subject =~ s/&/&amp;/g;
$subject =~ s/</&lt;/g;
$subject =~ s/>/&gt;/g;