view: prevent 'once' warnings for sub ref

Perl seems to incorrectly warn for this, workaround it.

diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm
index ab2720baf024af3b8186d0084364aa5d76265a8a..4e0150705754ccdc37927142a26ed8a015332bb1 100644 (file)
--- a/lib/PublicInbox/View.pm
+++ b/lib/PublicInbox/View.pm
@@ -579,6 +579,7 @@ sub thread_results {
        require PublicInbox::Thread;
        my $th = PublicInbox::Thread->new(@$msgs);
        $th->thread;
+       no warnings 'once';
        $th->order(*PublicInbox::Thread::sort_ts);
        $th
 }