Update of /cvsroot/mhonarc/mhonarc/MHonArc/lib
In directory subversions:/tmp/cvs-serv4468
Modified Files:
mhdb.pl mhidxrc.pl mhinit.pl
Log Message:
SPAMMODE activates MODIFYBODYADDRESSES.
Index: mhdb.pl
===================================================================
RCS file: /cvsroot/mhonarc/mhonarc/MHonArc/lib/mhdb.pl,v
retrieving revision 2.28
retrieving revision 2.29
diff -C2 -r2.28 -r2.29
*** mhdb.pl 31 Dec 2002 20:01:37 -0000 2.28
--- mhdb.pl 2 Jan 2003 04:20:05 -0000 2.29
***************
*** 439,443 ****
if (ref($ref) eq 'SCALAR') {
! print $fh qq/\$$name='/, escape_str($$ref), qq/'/;
print $fh qq/ unless defined(\$$name)/ if $d;
print $fh qq/;\n/;
--- 439,447 ----
if (ref($ref) eq 'SCALAR') {
! if (defined($$ref)) {
! print $fh qq/\$$name='/, escape_str($$ref), qq/'/;
! } else {
! print $fh '$',$name, '=undef';
! }
print $fh qq/ unless defined(\$$name)/ if $d;
print $fh qq/;\n/;
Index: mhidxrc.pl
===================================================================
RCS file: /cvsroot/mhonarc/mhonarc/MHonArc/lib/mhidxrc.pl,v
retrieving revision 2.12
retrieving revision 2.13
diff -C2 -r2.12 -r2.13
*** mhidxrc.pl 4 Sep 2002 04:09:30 -0000 2.12
--- mhidxrc.pl 2 Jan 2003 04:20:05 -0000 2.13
***************
*** 728,731 ****
--- 728,735 ----
}
+ if (!defined($AddrModifyBodies)) {
+ $AddrModifyBodies = 1 if $SpamMode;
+ }
+
}
Index: mhinit.pl
===================================================================
RCS file: /cvsroot/mhonarc/mhonarc/MHonArc/lib/mhinit.pl,v
retrieving revision 2.42
retrieving revision 2.43
diff -C2 -r2.42 -r2.43
*** mhinit.pl 31 Dec 2002 20:01:37 -0000 2.42
--- mhinit.pl 2 Jan 2003 04:20:05 -0000 2.43
***************
*** 375,379 ****
$ENV{'M2H_POSIXSTRFTIME'} : 0;
$AddrModifyBodies = defined($ENV{'M2H_MODIFYBODYADDRESSES'}) ?
! $ENV{'M2H_MODIFYBODYADDRESSES'} : 0;
if ($UNIX) {
--- 375,379 ----
$ENV{'M2H_POSIXSTRFTIME'} : 0;
$AddrModifyBodies = defined($ENV{'M2H_MODIFYBODYADDRESSES'}) ?
! $ENV{'M2H_MODIFYBODYADDRESSES'} : undef;
if ($UNIX) {
---------------------------------------------------------------------
To sign-off this list, send email to [EMAIL PROTECTED] with the
message text UNSUBSCRIBE MHONARC-DEV
