From ef282d24fb94e436331fcb1231e026adce11326a Mon Sep 17 00:00:00 2001 From: fukachan Date: Sun, 20 Jul 2003 04:57:16 +0000 Subject: comment on analyze() --- fml/lib/Mail/Message/DB.pm | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'fml') diff --git a/fml/lib/Mail/Message/DB.pm b/fml/lib/Mail/Message/DB.pm index a1617ce9..b0312ee5 100644 --- a/fml/lib/Mail/Message/DB.pm +++ b/fml/lib/Mail/Message/DB.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: DB.pm,v 1.1.2.15 2003/06/24 16:26:53 fukachan Exp $ +# $FML: DB.pm,v 1.2 2003/07/19 10:23:33 fukachan Exp $ # package Mail::Message::DB; @@ -25,7 +25,7 @@ use lib qw(../../../../fml/lib ../../../../img/lib ); -my $version = q$FML: DB.pm,v 1.1.2.15 2003/06/24 16:26:53 fukachan Exp $; +my $version = q$FML: DB.pm,v 1.2 2003/07/19 10:23:33 fukachan Exp $; if ($version =~ /,v\s+([\d\.]+)\s+/) { $version = $1;} # special value @@ -211,6 +211,12 @@ sub DESTROY =head1 PARSE and ANALYZE +=head2 analyze() + +update database on message header, thread relation information. + +XXX-TODO: This routine should be moved to Mail::Message::Thread ? + =cut -- cgit v1.2.1