summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-11-18 13:52:22 +0000
committerfukachan <fukachan>2002-11-18 13:52:22 +0000
commit59201de0f715e6087bc2b7bf0343e4702c181694 (patch)
treecde3a253cfc8fef045c854244707aa179b0d134c
parent0a34f17df9e7fdc782323dbd9c3975583384edf2 (diff)
downloadfml8-59201de0f715e6087bc2b7bf0343e4702c181694.tar.gz
fml8-59201de0f715e6087bc2b7bf0343e4702c181694.tar.bz2
fml8-59201de0f715e6087bc2b7bf0343e4702c181694.zip
correct start id calculation
enable queue flush to send digest.
-rw-r--r--fml/lib/FML/Process/Digest.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/Digest.pm b/fml/lib/FML/Process/Digest.pm
index 9efeb290..b0b8b629 100644
--- a/fml/lib/FML/Process/Digest.pm
+++ b/fml/lib/FML/Process/Digest.pm
@@ -3,7 +3,7 @@
# Copyright (C) 2002 Ken'ichi Fukamachi
# All rights reserved.
#
-# $FML: Digest.pm,v 1.2 2002/11/17 08:03:09 fukachan Exp $
+# $FML: Digest.pm,v 1.3 2002/11/17 14:07:33 fukachan Exp $
#
package FML::Process::Digest;
@@ -215,7 +215,7 @@ sub finish
if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; }
$curproc->inform_reply_messages();
- # $curproc->queue_flush();
+ $curproc->queue_flush();
$eval = $config->get_hook( 'digest_finish_end_hook' );
if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; }
@@ -238,6 +238,7 @@ sub _digest
# run digest proceess if article(s) not to send found.
if ($aid > $did) {
+ $did++; # start = last digest id + 1
my $range = "$did-$aid";
# create multipart of articles as a digest.