search: allow querying all mail with ''

This makes dumping recent topics easier, hopefully.

diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm
index b7b215f97eba2c99411cdb17283d6745ef0c1920..831c4fd786144352e426026b6d5cbe3908d26791 100644 (file)
--- a/lib/PublicInbox/Search.pm
+++ b/lib/PublicInbox/Search.pm
@@ -74,10 +74,14 @@ sub reopen { $_[0]->{xdb}->reopen }
 # read-only
 sub query {
        my ($self, $query_string, $opts) = @_;
-       my $query = $self->qp->parse_query($query_string, QP_FLAGS);
+       my $query;
 
        $opts ||= {};
-       $opts->{relevance} = 1;
+       unless ($query_string eq '') {
+               $query = $self->qp->parse_query($query_string, QP_FLAGS);
+               $opts->{relevance} = 1;
+       }
+
        $self->do_enquire($query, $opts);
 }
 
@@ -104,8 +108,11 @@ sub get_thread {
 sub do_enquire {
        my ($self, $query, $opts) = @_;
        my $enquire = $self->enquire;
-
-       $query = Search::Xapian::Query->new(OP_AND, $query, $mail_query);
+       if (defined $query) {
+               $query = Search::Xapian::Query->new(OP_AND,$query,$mail_query);
+       } else {
+               $query = $mail_query;
+       }
        $enquire->set_query($query);
        if ($opts->{relevance}) {
                $enquire->set_sort_by_relevance_then_value(TS, 0);