diff options
| -rw-r--r-- | lib/PublicInbox/Feed.pm | 5 | ||||
| -rw-r--r-- | lib/PublicInbox/View.pm | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm index d535cea9..6b317ab0 100644 --- a/lib/PublicInbox/Feed.pm +++ b/lib/PublicInbox/Feed.pm @@ -43,6 +43,8 @@ sub generate { my ($add) = @_; add_to_feed($feed_opts, $feed, $add, $git); }); + $git = undef; # destroy pipes + Email::Address->purge_cache; $feed->as_string; } @@ -68,6 +70,7 @@ sub generate_html_index { push @messages, $mime; 1; }); + $git = undef; # destroy pipes. my $th = Mail::Thread->new(@messages); $th->thread; @@ -85,6 +88,8 @@ sub generate_html_index { }); dump_html_line($_, 0, \$html) for $th->rootset; + Email::Address->purge_cache; + my $footer = nav_footer($args->{cgi}, $last); $footer = "<hr /><pre>$footer</pre>" if $footer; $html . "</pre>$footer</html>"; diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index c6ecee6e..a43ab620 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -210,6 +210,7 @@ sub html_footer { $to ||= $dst; } } + Email::Address->purge_cache; my $subj = $mime->header('Subject') || ''; $subj = "Re: $subj" unless $subj =~ /\bRe:/; |