diff options
| author | fukachan <fukachan> | 2001-11-07 09:28:27 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-07 09:28:27 +0000 |
| commit | d989935c565c2c398fe20be6852e140d32f02a42 (patch) | |
| tree | 2afd1efb7a4077b777d0d0f83f0c09c9f8b589a8 /fml/lib/FML/Process/ThreadTrack.pm | |
| parent | 0a56ca30d82d7da17dd9f472b3b8f1a97b86894c (diff) | |
| download | fml8-d989935c565c2c398fe20be6852e140d32f02a42.tar.gz fml8-d989935c565c2c398fe20be6852e140d32f02a42.tar.bz2 fml8-d989935c565c2c398fe20be6852e140d32f02a42.zip | |
enable fmlthread options:
--article_id_max=\d+ to override /var/spool/ml/$ml/seq
--reverse to reverse time order in showing "review"
Diffstat (limited to 'fml/lib/FML/Process/ThreadTrack.pm')
| -rw-r--r-- | fml/lib/FML/Process/ThreadTrack.pm | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/fml/lib/FML/Process/ThreadTrack.pm b/fml/lib/FML/Process/ThreadTrack.pm index cb2e700a..03b8eb53 100644 --- a/fml/lib/FML/Process/ThreadTrack.pm +++ b/fml/lib/FML/Process/ThreadTrack.pm @@ -4,7 +4,7 @@ # Copyright (C) 2000-2001 Ken'ichi Fukamachi # All rights reserved. # -# $FML: ThreadTrack.pm,v 1.8 2001/11/07 04:08:30 fukachan Exp $ +# $FML: ThreadTrack.pm,v 1.9 2001/11/07 04:31:13 fukachan Exp $ # package FML::Process::ThreadTrack; @@ -83,13 +83,15 @@ sub run my $ml_name = $config->{ ml_name }; my $thread_db_dir = $config->{ thread_db_dir }; my $spool_dir = $mydir || $config->{ spool_dir }; - my $max_id = $curproc->article_id_max(); + my $max_id = defined $options->{ article_id_max } ? + $options->{ article_id_max } : $curproc->article_id_max(); my $ttargs = { - logfp => \&Log, - fd => \*STDOUT, - db_base_dir => $thread_db_dir, - ml_name => $ml_name, - spool_dir => $spool_dir, + logfp => \&Log, + fd => \*STDOUT, + db_base_dir => $thread_db_dir, + ml_name => $ml_name, + spool_dir => $spool_dir, + reverse_order => (defined $options->{ reverse } ? 1 : 0), }; use Mail::ThreadTrack; |