X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FSearch.pm;h=71417d5e9ee471070468edb578e19343f2a72f12;hb=dff966c6e7e804b4e760aae39dda0b2c1a6ef30f;hp=5a57657ff4da5b1332afe8db5ed39b35c06f7d4e;hpb=6cdfe12cbcdd87ecfdafa487e4d78c3a12ac551e;p=public-inbox.git diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm index 5a57657f..71417d5e 100644 --- a/lib/PublicInbox/Search.pm +++ b/lib/PublicInbox/Search.pm @@ -190,9 +190,9 @@ sub xdir ($;$) { } } -sub _xdb_sharded { - my ($self, $xpfx) = @_; - opendir(my $dh, $xpfx) or return; # not initialized yet +sub xdb_sharded { + my ($self) = @_; + opendir(my $dh, $self->{xpfx}) or return; # not initialized yet # We need numeric sorting so shard[0] is first for reading # Xapian metadata, if needed @@ -200,7 +200,7 @@ sub _xdb_sharded { return if !defined($last); my (@xdb, $slow_phrase); for (0..$last) { - my $shard_dir = "$xpfx/$_"; + my $shard_dir = "$self->{xpfx}/$_"; if (-d $shard_dir && -r _) { push @xdb, $X{Database}->new($shard_dir); $slow_phrase ||= -f "$shard_dir/iamchert"; @@ -221,7 +221,7 @@ sub _xdb { my $dir = xdir($self, 1); $self->{qp_flags} //= $QP_FLAGS; if ($self->{ibx_ver} >= 2) { - _xdb_sharded($self, $dir); + xdb_sharded($self); } else { $self->{qp_flags} |= FLAG_PHRASE() if !-f "$dir/iamchert"; $X{Database}->new($dir);