From 10ba2623d01ca0cb7475bbd74aa72b8370e554f0 Mon Sep 17 00:00:00 2001 From: fukachan Date: Sun, 11 Nov 2001 13:37:40 +0000 Subject: ThreadTrack switches acconding to myname ($0). threadview is view only and cannot change status. --- fml/lib/FML/Process/ThreadTrack.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'fml/lib/FML/Process/ThreadTrack.pm') diff --git a/fml/lib/FML/Process/ThreadTrack.pm b/fml/lib/FML/Process/ThreadTrack.pm index e94ed36c..6442d0c9 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.10 2001/11/07 09:28:27 fukachan Exp $ +# $FML: ThreadTrack.pm,v 1.11 2001/11/09 13:23:15 fukachan Exp $ # package FML::Process::ThreadTrack; @@ -74,6 +74,7 @@ sub run { my ($curproc, $args) = @_; my $config = $curproc->{ config }; + my $myname = $curproc->myname(); my $argv = $curproc->command_line_argv(); my $options = $curproc->command_line_options(); my $mydir = defined $options->{spool_dir} ? $options->{spool_dir} : ''; @@ -86,6 +87,7 @@ sub run my $max_id = defined $options->{ article_id_max } ? $options->{ article_id_max } : $curproc->article_id_max(); my $ttargs = { + myname => $myname, logfp => \&Log, fd => \*STDOUT, db_base_dir => $thread_db_dir, -- cgit v1.2.1