mbox: do not barf on queries which return no results

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

diff --git a/lib/PublicInbox/SearchView.pm b/lib/PublicInbox/SearchView.pm
index bf4415f011b8ea79603a1de8c4da348b312e9d08..1c4442e4d7b8a300775c817aac435b47da9abb56 100644 (file)
--- a/lib/PublicInbox/SearchView.pm
+++ b/lib/PublicInbox/SearchView.pm
@@ -22,6 +22,7 @@ sub mbox_results {
        my ($ctx) = @_;
        my $q = PublicInbox::SearchQuery->new($ctx->{qp});
        my $x = $q->{x};
+       require PublicInbox::Mbox;
        return PublicInbox::Mbox::mbox_all($ctx, $q->{'q'}) if $x eq 'm';
        sres_top_html($ctx);
 }
@@ -309,10 +310,8 @@ sub new {
        my ($class, $qp) = @_;
 
        my $r = $qp->{r};
-       my $l = $qp->{l} || '200';
-       if (! ($l =~ /(\d+)/ && $l <= $LIM)) {
-               $l = $LIM;
-       }
+       my ($l) = (($qp->{l} || '') =~ /(\d+)/);
+       $l = $LIM if !$l || $l > $LIM;
        bless {
                q => $qp->{'q'},
                x => $qp->{x} || '',