Update of /home/users/mhonarc.org/ehood/cvs/mhonarc/mhonarc/MHonArc/lib
In directory denethor.mallorn.com:/tmp/cvs-serv11860
Modified Files:
mhamain.pl
Log Message:
BUG #12802 FIXED: Make sure SUBJECTSTRIPCODE applies to subject string
$fields hash. Original subject is stored in the special key
'x-mha-org-subject' of $fields if SUBJECTSTRIPCODE enabled. Also,
$fields is "cleaned" of any multiple subjects. I.e. The first Subject:
header field is used, all others are dropped.
Index: mhamain.pl
===================================================================
RCS file: /home/users/mhonarc.org/ehood/cvs/mhonarc/mhonarc/MHonArc/lib/mhamain.pl,v
retrieving revision 2.76
retrieving revision 2.77
diff -C2 -r2.76 -r2.77
*** mhamain.pl 15 Dec 2004 20:33:39 -0000 2.76
--- mhamain.pl 2 May 2005 00:25:40 -0000 2.77
***************
*** 841,847 ****
## Get Subject ##
##-------------##
! if (defined($fields->{'subject'}) && ($fields->{'subject'}[0] =~ /\S/)) {
($sub = $fields->{'subject'}[0]) =~ s/\s+$//;
! $sub = subject_strip($sub) if $SubStripCode;
} else {
$sub = '';
--- 841,851 ----
## Get Subject ##
##-------------##
! if (defined($fields->{'subject'})) {
($sub = $fields->{'subject'}[0]) =~ s/\s+$//;
! if ($SubStripCode) {
! $fields->{'x-mha-org-subject'} = $sub;
! $sub = subject_strip($sub);
! }
! $fields->{'subject'} = [ $sub ]; # Make sure only one subject
} else {
$sub = '';
---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-COMMITS