diff options
| author | fukachan <fukachan> | 2001-11-12 02:19:19 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-12 02:19:19 +0000 |
| commit | 7e6bcf8dffbe007ea7e0ebad51eb17d0c1524cde (patch) | |
| tree | f35ef00b5bcb93feec9b7660c060353c84b3bc15 /fml/lib | |
| parent | d1e100b73048916e884ccb09f247f23e704f6cf2 (diff) | |
| download | fml8-7e6bcf8dffbe007ea7e0ebad51eb17d0c1524cde.tar.gz fml8-7e6bcf8dffbe007ea7e0ebad51eb17d0c1524cde.tar.bz2 fml8-7e6bcf8dffbe007ea7e0ebad51eb17d0c1524cde.zip | |
fix typo, $myname resolved by $curproc->myname()
Diffstat (limited to 'fml/lib')
| -rw-r--r-- | fml/lib/FML/CGI/ThreadTrack.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/fml/lib/FML/CGI/ThreadTrack.pm b/fml/lib/FML/CGI/ThreadTrack.pm index e3cdb479..b1243799 100644 --- a/fml/lib/FML/CGI/ThreadTrack.pm +++ b/fml/lib/FML/CGI/ThreadTrack.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: ThreadTrack.pm,v 1.6 2001/11/11 23:33:59 fukachan Exp $ +# $FML: ThreadTrack.pm,v 1.7 2001/11/11 23:42:05 fukachan Exp $ # package FML::CGI::ThreadTrack; @@ -106,7 +106,7 @@ sub run_cgi my ($ml, $id, $value) = @$param; if ($value eq 'closed') { my $tid = $thread->_create_thread_id_strings($id); - print "closed $tid", br, '\n"; + print "closed $tid", br, "\n"; $thread->close($tid); } } @@ -152,8 +152,7 @@ sub _show_guide { my ($curproc, $args) = @_; my $config = $curproc->{ config }; - my $myname = $config->{ program_name }; - my $action = $myname; + my $action = $curproc->myname(); my $target = $config->{ thread_cgi_target_window } || 'ThreadCGIWindow'; my $ml_list = $curproc->get_ml_list($args); my $ml_name = $config->{ ml_name }; |