diff options
| author | fukachan <fukachan> | 2006-03-19 08:06:05 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2006-03-19 08:06:05 +0000 |
| commit | 6f90c5b92a10c23def61a1397958a75a01443a8d (patch) | |
| tree | 83cd79d8652cc1a0bcfc7a8128a66c1b84b09048 | |
| parent | cf784d12bef8b3b286879d02af55c016d71b6671 (diff) | |
| download | fml8-6f90c5b92a10c23def61a1397958a75a01443a8d.tar.gz fml8-6f90c5b92a10c23def61a1397958a75a01443a8d.tar.bz2 fml8-6f90c5b92a10c23def61a1397958a75a01443a8d.zip | |
$use_smtp_log enable/disable smtp transaction logging.
| -rw-r--r-- | fml/lib/FML/Process/Distribute.pm | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/fml/lib/FML/Process/Distribute.pm b/fml/lib/FML/Process/Distribute.pm index a716fe00..f38851e9 100644 --- a/fml/lib/FML/Process/Distribute.pm +++ b/fml/lib/FML/Process/Distribute.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000,2001,2002,2003,2004,2005,2006 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Distribute.pm,v 1.168 2006/01/09 14:00:54 fukachan Exp $ +# $FML: Distribute.pm,v 1.169 2006/02/04 07:42:24 fukachan Exp $ # package FML::Process::Distribute; @@ -603,10 +603,15 @@ sub _deliver_article my $handle = undef; # overload $sfp log function pointer. - my $wh = $curproc->outgoing_message_cache_open(); - if (defined $wh) { - $sfp = sub { print $wh @_;}; - $handle = undef; # $wh; + if ($config->yes('use_smtp_log')) { + my $wh = $curproc->outgoing_message_cache_open(); + if (defined $wh) { + $sfp = sub { print $wh @_;}; + $handle = undef; # $wh; + } + } + else { + $sfp = sub {}; } # delay loading of module |