use Cwd qw/abs_path/;
use Data::Dump qw(dump);
-use BackupPC::Search::Estraier;
+our $search_module;
+BEGIN {
+ $search_module = "BackupPC::Search::Estraier";
+ $search_module = "BackupPC::Search::KinoSearch" if $ENV{KINO};
+ eval "use $search_module";
+ if ( $@ ) {
+ warn "ERROR: $search_module: $!";
+ } else {
+ warn "# using $search_module for full-text search";
+ }
+}
use constant BPC_FTYPE_DIR => 5;
use constant EST_CHUNK => 4096;
my $offset = 0;
my $added = 0;
- my $search = BackupPC::Search::Estraier->new( $index_node_url );
+ my $search = $search_module->new( $index_node_url );
my $results = 0;