lei q: enable expensive Xapian flags

[public-inbox.git] / lib / PublicInbox / LeiSearch.pm

diff --git a/lib/PublicInbox/LeiSearch.pm b/lib/PublicInbox/LeiSearch.pm
index 1fb38da1d7aaac22d7f9475cb342a4cdb4e0b3e4..d0ca13f0aa11e444b2fc5292b927dbc777b0a677 100644 (file)
--- a/lib/PublicInbox/LeiSearch.pm
+++ b/lib/PublicInbox/LeiSearch.pm
@@ -175,6 +175,8 @@ sub all_terms {
 sub qparse_new {
        my ($self) = @_;
        my $qp = $self->SUPER::qparse_new; # PublicInbox::Search
+       $self->{qp_flags} |= PublicInbox::Search::FLAG_PHRASE() |
+                               PublicInbox::Search::FLAG_PURE_NOT();
        $qp->add_boolean_prefix('kw', 'K');
        $qp->add_boolean_prefix('L', 'L');
        $qp