X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FLeiQuery.pm;h=c998e5c0ed7bbf07a09eeb7179857cfce789620c;hb=84b7b8b9a0897c1f062e304aa6d16e2ea819fece;hp=effc572f6aaf45e658b1434537081342e29efe7e;hpb=bb0eab1051318528011252866b592735981084a5;p=public-inbox.git diff --git a/lib/PublicInbox/LeiQuery.pm b/lib/PublicInbox/LeiQuery.pm index effc572f..c998e5c0 100644 --- a/lib/PublicInbox/LeiQuery.pm +++ b/lib/PublicInbox/LeiQuery.pm @@ -32,10 +32,13 @@ sub _start_query { # used by "lei q" and "lei up" if ($l2m && grep { $opt->{$_} //= \1 } (qw(mail-sync import-remote import-before))) { $self->_lei_store(1)->write_prepare($self); + if ($opt->{'mail-sync'}) { + my $lms = $l2m->{-lms_rw} = $self->lms(1); + $lms->lms_write_prepare->lms_pause; # just create + } } - $l2m and $l2m->{-wq_nr_workers} = $mj // do { - $mj = int($nproc * 0.75 + 0.5); # keep some CPU for git - }; + $l2m and $l2m->{-wq_nr_workers} //= $mj // + int($nproc * 0.75 + 0.5); # keep some CPU for git # descending docid order is cheapest, MUA controls sorting order $self->{mset_opt}->{relevance} //= -2 if $l2m || $opt->{threads}; @@ -138,6 +141,7 @@ no query allowed on command-line with --stdin PublicInbox::InputPipe::consume($self->{0}, \&qstr_add, $self); return; } + chomp(@argv) and $self->qerr("# trailing `\\n' removed"); $mset_opt{q_raw} = [ @argv ]; # copy $mset_opt{qstr} = $self->{lse}->query_argv_to_string($self->{lse}->git, \@argv); @@ -181,7 +185,7 @@ sub _complete_q { # FIXME: Getopt::Long doesn't easily let us support support options with # '.' in them (e.g. --http1.1) # TODO: should we depend on "-c http.*" options for things which have -# analogues in git(1)? that would reduce likelyhood of conflicts with +# analogues in git(1)? that would reduce likelihood of conflicts with # our other CLI options # Note: some names are renamed to avoid potential conflicts, # see %lei2curl in lib/PublicInbox/LeiCurl.pm