summaryrefslogtreecommitdiff
path: root/fml/lib/Mail/ThreadTrack.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-03-31 02:25:42 +0000
committerfukachan <fukachan>2002-03-31 02:25:42 +0000
commitf7746ad3ed4dbb66557073b7cd753c872cf22fce (patch)
treefde03370484d074351eb0487a1c99d836755c81d /fml/lib/Mail/ThreadTrack.pm
parent7b80663d6d3539c6200608e33b93f334ec4ad47a (diff)
downloadfml8-f7746ad3ed4dbb66557073b7cd753c872cf22fce.tar.gz
fml8-f7746ad3ed4dbb66557073b7cd753c872cf22fce.tar.bz2
fml8-f7746ad3ed4dbb66557073b7cd753c872cf22fce.zip
Mail::Message::Spool::spool arg changes: $spool_dir -> $base_dir
Diffstat (limited to 'fml/lib/Mail/ThreadTrack.pm')
-rwxr-xr-xfml/lib/Mail/ThreadTrack.pm17
1 files changed, 12 insertions, 5 deletions
diff --git a/fml/lib/Mail/ThreadTrack.pm b/fml/lib/Mail/ThreadTrack.pm
index e636b1dc..22affc88 100755
--- a/fml/lib/Mail/ThreadTrack.pm
+++ b/fml/lib/Mail/ThreadTrack.pm
@@ -1,10 +1,10 @@
#-*- perl -*-
#
-# Copyright (C) 2001 Ken'ichi Fukamachi
+# Copyright (C) 2001,2002 Ken'ichi Fukamachi
# 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.24 2001/12/26 14:23:29 fukachan Exp $
+# $FML: ThreadTrack.pm,v 1.25 2002/03/31 01:59:00 fukachan Exp $
#
package Mail::ThreadTrack;
@@ -504,10 +504,17 @@ sub log
return article file path.
+ $args = {
+ base_dir => DIR,
+ id => NUM,
+ use_subdir => 1 or 0,
+ };
+
=cut
-# Descriptions: return article file path.
-# Arguments: OBJ($self) OBJ($curproc) NUM($id)
+
+# Descriptions: return the article file path.
+# Arguments: OBJ($self) HASH_REF($args)
# Side Effects: none
# Return Value: STR(file path)
sub filepath
@@ -528,7 +535,7 @@ Ken'ichi Fukamachi
=head1 COPYRIGHT
-Copyright (C) 2001 Ken'ichi Fukamachi
+Copyright (C) 2001,2002 Ken'ichi Fukamachi
All rights reserved. This program is free software; you can
redistribute it and/or modify it under the same terms as Perl itself.