diff options
Diffstat (limited to 'lib/PublicInbox/Thread.pm')
-rw-r--r-- | lib/PublicInbox/Thread.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/PublicInbox/Thread.pm b/lib/PublicInbox/Thread.pm index 781fffff..44a565ad 100644 --- a/lib/PublicInbox/Thread.pm +++ b/lib/PublicInbox/Thread.pm @@ -12,6 +12,20 @@ package PublicInbox::Thread; use strict; use warnings; use base qw(Mail::Thread); +# WARNING! both these Mail::Thread knobs were found by inspecting +# the Mail::Thread 2.55 source code, and we have some monkey patches +# in PublicInbox::Thread to fix memory leaks. Since Mail::Thread +# appears unmaintained, I suppose it's safe to depend on these +# variables for now: +{ + no warnings 'once'; + # we want strict threads to expose (and hopefully discourage) + # use of broken email clients + $Mail::Thread::nosubject = 1; + # Keep ghosts with only a single direct child, + # don't hide that there may be missing messages. + $Mail::Thread::noprune = 1; +} if ($Mail::Thread::VERSION <= 2.55) { eval q(sub _container_class { 'PublicInbox::Thread::Container' }); |