diff options
| author | fukachan <fukachan> | 2004-10-28 03:33:48 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-10-28 03:33:48 +0000 |
| commit | 2e632016e115738d8244c24234223c791272887f (patch) | |
| tree | 94467d05f63f9aad47e1e5e9d7e99a953139d3fc | |
| parent | ba51dec8662e71c443f0d3b456fb67e6a70540cd (diff) | |
| download | fml8-2e632016e115738d8244c24234223c791272887f.tar.gz fml8-2e632016e115738d8244c24234223c791272887f.tar.bz2 fml8-2e632016e115738d8244c24234223c791272887f.zip | |
update article message-id cache if article is saved successfully.
| -rw-r--r-- | fml/lib/FML/Article.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/fml/lib/FML/Article.pm b/fml/lib/FML/Article.pm index d62a2c22..42cba73f 100644 --- a/fml/lib/FML/Article.pm +++ b/fml/lib/FML/Article.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: Article.pm,v 1.68 2004/07/23 15:58:59 fukachan Exp $ +# $FML: Article.pm,v 1.69 2004/08/14 08:12:31 fukachan Exp $ # package FML::Article; @@ -192,6 +192,10 @@ sub spool_in else { $fh->close; $curproc->log("article $id"); + + # update article message id cache. + my $_header = $curproc->incoming_message_header(); + $_header->update_article_message_id_cache($config); } } } |