summaryrefslogtreecommitdiff
path: root/fml/lib/Mail/ThreadTrack.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-11-16 10:08:18 +0000
committerfukachan <fukachan>2001-11-16 10:08:18 +0000
commit75b6c1f718ec789692efaa7e9b478c53c460e5b3 (patch)
tree00ef502723477f0845cb422138b9110714eee30b /fml/lib/Mail/ThreadTrack.pm
parent6651119a5822ae440536d45bc63cc103600f1b8f (diff)
downloadfml8-75b6c1f718ec789692efaa7e9b478c53c460e5b3.tar.gz
fml8-75b6c1f718ec789692efaa7e9b478c53c460e5b3.tar.bz2
fml8-75b6c1f718ec789692efaa7e9b478c53c460e5b3.zip
new(): save $args as _saved_args in $self
Diffstat (limited to 'fml/lib/Mail/ThreadTrack.pm')
-rwxr-xr-xfml/lib/Mail/ThreadTrack.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/fml/lib/Mail/ThreadTrack.pm b/fml/lib/Mail/ThreadTrack.pm
index e4fdaa81..ea97b384 100755
--- a/fml/lib/Mail/ThreadTrack.pm
+++ b/fml/lib/Mail/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.16 2001/11/11 11:12:28 fukachan Exp $
+# $FML: ThreadTrack.pm,v 1.17 2001/11/11 13:37:42 fukachan Exp $
#
package Mail::ThreadTrack;
@@ -112,6 +112,7 @@ sub new
$me->{ _index_db } = File::Spec->catfile($base_dir, "index");
$me->{ _db_dir } = File::Spec->catfile($base_dir, $ml_name);
$me->{ _fd } = $args->{ fd } || \*STDOUT;
+ $me->{ _saved_args } = $args;
# ::Print parameters
$me->{ _article_summary_lines } = 5;